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内 容 简 介 


本 书 针对 有 C/C++ 语 言 基础 的 网 络 编程 初学 者 ,以 WinSock API 和 MFC Sockets 为 编程 主线 ,以 通俗 
易 懂 的 方法 介绍 Windows 平台 下 的 网 络 编程 方法 ,引导 读者 循序 渐进 地 提高 网 络 编程 能 力 。 本 书 内 容 丰 
富 ,涵盖 了 网 络 编程 模型 .P2P 网 络 模型 Windows 网 络 编程 ` WinSock2 API 编程 .阻塞 / 非 阻塞 模式 套 接 
字 编 程 .异步 套 接 字 编 程 .Blocking 1/0 编程 ,select I/O 编程 . WSAAsyncSelect 1/0 编程 .WSAEventSelect 
IO 编程 .Overlapped I/O 编程 .1/O Completion Port 编程 .MFC 套 接 字 编 程 、WinInet API 4i f, MFC 
WinInet 编程 .FTP 编程 .HTTP 编程 .SMTP/POP3 编程 Windows 多 线程 编程 .WinPcap 编程 .网络 五 子 
棋 的 设计 与 实现 等 。 

本 书 是 编者 在 多 年 教学 和 实践 工作 的 基础 上 编写 的 ,其 语言 生动 流畅 ,分 析 深 入 浅 出 ,步骤 精炼 ,图 文 
并 茂 。 本 书 注重 应 用 ,强调 实践 ,案例 编码 覆盖 主流 技术 和 方法 ,能 够 帮助 读者 快速 地 学 以 致 用 。 本 书 可 
作为 各 类 学 校 的 网 络 编程 专业 教材 ,也 可 作为 网 络 编程 人 员 的 自学 参考 用 书 。 
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随 着 我 国 改革 开放 的 进一步 深化 ,高 等 教育 也 得 到 了 快速 发 展 ,各 地 高 校 紧 密 结合 地 方 
经 济 建设 发 展 需要 ,科学 运用 市 场 调节 机 制 , 加 大 了 使 用 信息 科学 等 现代 科学 技术 提升 、 改 
造 传统 学 科 专 业 的 投入 力度 ,通过 教育 改革 合理 调整 和 配置 了 教育 资源 ,优化 了 传统 学 科 专 
业 , 积 极为 地 方 经 济 建设 输送 人 才 ,为 我 国 经 济 社会 的 快速 健康 和 可 持续 发 展 以 及 高 等 教 
育 自身 的 改革 发 展 做 出 了 巨大 贡献 。 但 是 ,高 等 教育 质量 还 需要 进一步 提高 以 适应 经 济 社 
会 发 展 的 需要 ,不 少 高 校 的 专业 设置 和 结构 不 尽 合理 ,教师 队伍 整体 素质 最 待 提高 ,人 才 培 
养 模式 .教学 内 容 和 方法 需要 进一步 转变 ,学 生 的 实践 能 力 和 创新 精神 或 待 加 强 。 
教育 部 一 直 十 分 重视 高 等 教育 质量 工作 。2007 年 1 月 ,教育 部 下 发 了 《关于 实施 高 等 
学 校本 科教 学 质量 与 教学 改革 工程 的 意见 》, 计 划 实 施 “ 高 等 学 校本 科教 学 质量 与 教学 改革 
工程 (简称 “质量 工程 ')”, 通 过 专业 结构 调整 .课程 教材 建设 ,实践 教学 改革 、 教 学 团队 建设 
等 多 项 内 容 , 进 一 步 深 化 高 等 学 校 教 学 改革 ,提高 人 才 培 养 的 能 力 和 水 平 ,更 好 地 满足 经 济 
社会 发 展 对 高 素质 人 才 的 需要 。 在 贯彻 和 落实 教育 部 “质量 工程 ”的 过 程 中 ,各 地 高 校 发 挥 
师资 力量 强 、 办 学 经 验 丰 富 、 教 学 资源 充裕 等 优势 ,对 其 特色 专业 及 特色 课程 ( 群 ) 加 以 规划 、 
整理 和 总 结 ,更 新 教学 内 容 、 改 革 课 程 体系 ,建设 了 一 大 批 内 容 新 、 体 系 新 、 方 法 新 、 手 段 新 的 
特色 课程 。 在 此 基础 上 ,经 教育 部 相关 教学 指导 委员 会 专家 的 指导 和 建议 ,清华 大 学 出 版 社 
在 多 个 领域 精 选 各 高 校 的 特色 课程 ,分别 规划 出 版 系列 教材 ,以 配合 “质量 工程 ”的 实施 , 满 
为 了 深入 贯彻 落实 教育 部 (关于 加 强 高 等 学 校本 科教 学 工作 ,提高 教学 质量 的 若干 意 
见 ) 精 神 ,紧密 配合 教育 部 已 经 启动 的 “高 等 学 校 教学 质量 与 教学 改革 工程 精品 课程 建设 工 
作 ”, 在 有 关 专 家 、 教 授 的 倡议 和 有 关 部 门 的 大 力 支持 下 ,我 们 组 织 并 成 立 了 “清华 大 学 出 版 
社 教材 编审 委员 会 "(以 下 简称 “ 编 委 会 ”), 旨 在 配合 教育 部 制定 精品 课程 教材 的 出 版 规划 ， 
讨论 并 实施 精品 课程 教材 的 编写 与 出 版 工作 。“ 编 委 会 "成员 皆 来 自 全 国 各 类 高 等 学 校 教学 
与 科研 第 一 线 的 骨干 教师 ,其 中 许多 教师 为 各 校 相关 院 、 系 主管 教学 的 院 长 或 系 主任 。 
按照 教育 部 的 要 求 ,“ 编 委 会 ”一 致 认为 .精品 课程 的 建设 工作 从 开始 就 要 坚持 高 标准 、 
严 要 求 ,处 于 一 个 比较 高 的 起 点 上 ; 精品 课程 教材 应 该 能 够 反映 各 高 校 教学 改革 与 课程 建 
设 的 需要 ,要 有 特色 风格 有 创新 性 (新 体系 、 新 内 容 、 新 手段 .新 思路 ,教材 的 内 容 体系 有 和 较 
高 的 科学 创新 ,技术 创新 和 理念 创新 的 含量 )、 先 进 性 (对 原 有 的 学 科 体系 有 实质 性 的 改革 和 
发 展 ,顺应 并 符合 21 世纪 教学 发 展 的 规律 ,代表 并 引领 课程 发 展 的 趋势 和 方向 ) ,示范 性 ( 教 
材 所 体现 的 课程 体系 具有 较 广泛 的 辐射 性 和 示范 性 ) 和 一 定 的 前 瞻 性 。 教材 由 个 人 申报 或 
各 校 推荐 (通过 所 在 高 校 的 “ 编 委 会 "成员 推 荐 ) ,经 “ 编 委 会 认真 评审 ,最 后 由 清华 大 学 出 版 
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社 审定 出 版 。 
目前 ,针对 计算 机 类 和 电子 信息 类 相关 专业 成 立 了 两 个 “ 编 委 会 ”, 即 “清华 大 学 出 版 社 
计算 机 教材 编审 委员 会 "和 “清华 大 学 出 版 社 电 子 信息 教材 编审 委员 会 "。 推 出 的 特色 精品 


教材 包括 : 

(1) 21 世纪 高 等 学 校规 划 教 材 * 计算 机 应 用 一 一 高 等 学 校 各 类 专业 ,特别 是 非 计算 机 
专业 的 计算 机 应 用 类 教材 。 

(2) 21 世纪 高 等 学 校规 划 教材 ， 计算 机 科学 与 技术 一 一 高 等 学 校 计算 机 相关 专业 的 
教材 。 


(3) 21 世纪 高 等 学 校规 划 教材 电子 信息 一 一 高 等 学 校 电子 信息 相关 专业 的 教材 。 
(4) 21 世纪 高 等 学 校规 划 教材 "软件 工程 一 高 等 学 校 软件 工程 相关 专业 的 教材 。 
(5) 21 世纪 高 等 学 校规 划 教材 "信息 管理 与 信息 系统 。 

(6) 21 世纪 高 等 学 校规 划 教材 "财经 管理 与 应 用 。 

(7) 21 世纪 高 等 学 校规 划 教材 。 电子 商务 。 

(8) 21 世纪 高 等 学 校规 划 教材 物 联 网 。 


清华 大 学 出 版 社 经 过 三 十 多 年 的 努力 ,在 教材 尤其 是 计算 机 和 电子 信息 类 专业 教材 出 
版 方面 树立 了 权威 品牌 ,为 我 国 的 高 等 教育 事业 做 出 了 重要 页 献 。 清 华 版 教材 形成 了 技术 
准确 、 内 容 严谨 的 独特 风格 ,这 种 风格 将 延续 并 反映 在 特色 精品 教材 的 建设 中 。 


清华 大 学 出 版 社 教材 编审 委员 会 
KRA: DI 


E-mail : weijj@ tup. tsinghua. edu. cn 


互联 网 编程 有 两 个 主流 方向 : 一 个 是 Web 开发 ; 另 一 个 是 网 络 编程 。 从 应 用 层面 看 ， 
前 者 看 起 来 相对 高 端 , 后 者 看 起 来 偏 中 低 端 。 大 家 耳熟能详 的 网 站 类 应 用 ,如 网 易 、 搜 狐 、 新 
浪 、 淘 宝 等 属于 前 者 , 称 做 Web 应 用 。 而 另 一 些 * 遍 地 开花 ?的 应 用 ,如 QQ MSN GR E. 
PPLive、Skype、 防 火 墙 、 网 络 监控 、 流 量 计 费 IIS 服务 器 .Tomcat 服务 器 等 属于 后 者 , 称 做 
网 络 工 具 。 

开发 Web 应 用 , 它 的 底层 支撑 平台 是 Web 服务 器 ; 开发 网 络 工具 , 它 的 底层 支撑 平台 
是 操作 系统 。 大 家 所 说 的 Web 开发 和 网 络 编程 一 个 高 端 、 一 个 中 低 端 即 源 于 此 。 如 果 硬 要 
在 二 者 之 间 划 出 一 个 严格 的 界限 是 不 甚 妥 当 的 。 现 在 的 技术 趋势 是 你 中 有 我 ,我 中 有 你 , 相 
互 融 合 “ 上 九天 揽 月 ,下 五 洋 捉 整 " 可 谓 当 下 互联 网 编程 的 真实 写照 。 本 书 内 容 定位 于 网 络 
工具 的 编程 方法 ,基础 根基 是 操作 系统 ,不 讨论 基于 Web 服务 器 的 Web 编程 。 

“网 络 编程 ?这 门 课 到 底 应 该 选用 哪 种 语言 教学 ,不 少 老师 感到 很 困惑 。 通 常 ,用 Java 
语言 编 的 程序 离 不 开 JVM 虚拟 机 支持 ,用 C 语言 编 的 程序 离 不 开 . NET 虚拟 机 支持 , 且 
Java 语言 和 C# 语 言 非常 适合 Web 编程 。Windows 操作 系统 是 用 C/C++ 语言 编写 的 , 显 
然 ,C/C++ 更 适合 网 络 编程 这 门 课 , 更 适合 开发 互联 网 中 神通 广大 、 中 流 碟 柱 的 应 用 。 

本 书 设计 了 两 条 教学 主线 : 一 条 是 基于 Windows API 编程 ; 另 一 条 是 基于 MFC 编 
程 。 对 于 前 者 ,具体 到 WinSock2 API 编程 ; 对 于 后 者 ,具体 到 CAsyncSocket 类 、CSocket 
类 编程 。 这 两 条 教学 主线 相互 对 照 , 相 得 益 彰 ,构成 本 书 教学 的 核心 和 灵魂 。 

本 书 内 容 共 分 为 9 章 。 第 1 章 网 络 编程 概述 ,讨论 了 网 络 编程 模型 `P2P 网 络 模型 、 
Windows 网 络 编程 。 第 2 章 WinSock2 API 编程 ,讲述 Win32 API fi f 4i fe, WinSock2 
API 编程 框架 .阻塞 / 非 阻塞 模式 套 接 字 编程 .异步 套 接 字 编 程 \.Blocking 1/0 £i f£ , select 
1/0 编程 WSA AsyncSelect I/O 编程 WSAEventSelect I/O 编程 .Overlapped 1/0 编程 、 
Completion Port 编程 。 第 3 5€ MFC 套 接 字 编 程 ,讲述 MFC 套 接 字 编 程 模型 CAsyncSocket 类 
编程 .CSocket 类 编程 。 第 4 一 6 章 分 别 讲述 了 Windows Internet 编程 MFC Internet 编程 和 
SMTP/POP3 编程 。 第 7 章 Windows 多 线程 编程 ,讲述 了 用 C 和 Win32 API 编写 多 线程 
以 及 用 C++ 和 MFC 编写 多 线程 两 种 方法 。 第 8 章 WinPcap 编程 ,讲述 了 WinPcap 编程 框 
WAI WinPcap 编程 应 用 。 第 9 章 网 络 五 子 棋 , 从 实战 角度 详细 讲述 人 机 对 战 和 网 络 对 战 项 
目的 设计 。 

本 书 有 幸 得 到 鲁 东 大 学 邹 海 林 教 授 、 杨 洪 勇 教授 、 徐 邦 海 副教授 、 寇 光 杰 副教授 . 李 阿 丽 
老师 、 曲 海平 博士 \ 田 生 文博 士 和 烟台 市 财政 局 崔 运 政 博士 审阅 ,并 提出 许多 宝贵 的 意见 , 编 
者 铭记 于 心 。 

本 书 有 幸 得 到 清华 大 学 出 版 社 支持 ,有 幸 得 到 教材 事业 部 主任 魏 江 江 老 师 关注 ,有 幸 得 
到 责任 编辑 黄 芝 老师 严 并 审 校 精心 编排 ,感激 之 情 无 以 言 表 。 

高 山 无 声 ,水 流花 开 , 各 方 涓涓 细 爱 汇集 于 此 , 终 使 本 书 与 读者 见面 。 
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本 书 适合 有 C/C++ 语言 基础 的 读者 学 习 , 每 一 章 都 配 有 精 选 的 案例 或 程序 片段 ,有 助 
于 读者 反复 揣摩 .练习 提高 。 本 书 完整 的 案例 都 在 VC++ 2010 环境 下 调试 通过 ,涵盖 了 主 
流 技术 和 方法 ,体现 了 教学 目的 ,贴近 实际 应 用 。 

互联 网 如 同一 个 巨大 的 天 体 飞 船 ,里 挟 着 整个 地 球 , 全 人 类 ,全 社会 为 之 疯狂 ,为 之 飞 
奔 。 人 们 无 从 准确 地 知晓 它 的 终点 ,更 无 从 清晰 地 预见 它 的 未 来 ,能 够 唯一 感受 到 的 是 它 惊 
人 的 发 展 速 度 ,能 够 唯一 体会 到 的 是 它 无 穷 的 变化 方式 。 或 许 正 因 如 此 ,互联 网 编程 是 极 具 
魅力 与 挑战 的 ,吸引 着 越 来 越 多 的 人 进入 这 个 行业 。 但 由 于 编者 水 平 有 限 , 书 中 错误 或 不 妥 
之 处 在 所 难免 ,恳请 各 位 读者 批评 指正 。 

您 的 每 一 处 指正 ,编者 都 如 获 至 宝 ,不胜 感激 (编者 邮箱 : upsunny2008@163. com) 。 


编 者 
2013 年 10 月 于 山东 烟台 
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在 单机 时 代 , 写 一 手 好 程序 是 很 值得 引 以 为 傲 的 ,但 这 并 不 代表 在 网 络 时 代 能 写 出 好 的 
网 络 程序 。 尽 管 那 名 “网 络 就 是 计算 机 ”的 口号 时 常 在 网 络 世 界 里 回响 ,网 络 和 单机 还 是 有 
很 大 的 不 同 ,网 络 编程 需要 处 理 主机 之 间 的 通信 ,处 理 同步 .异步 ,处 理 阻塞 , 非 阻 塞 ,主机 间 
可 能 是 对 等 的 ,也 可 能 是 客户 机 和 服务 器 ,要 区 别 对 待 …… 这 一 系列 的 问题 都 需要 编程 者 加 
以 思考 和 解决 。 

本 章 从 网 络 编程 模型 .P2P 网 络 模型 和 Windows 网 络 编程 三 部 分 内 容 和 信 手 ,引领 读者 
进入 网 络 编程 学 习 领 域 。 网 络 编程 模型 是 开启 网 络 编程 大 门 的 钥匙 ,是 初学 者 学 习 网 络 编 
程 技术 的 理论 基础 ,因此 ,1. 1 节 将 从 不 同 角度 对 网 络 编程 模型 进行 分 析 和 讲述 。P2P 网 络 
是 互联 网 近 十 年 最 热门 的 应 用 领域 之 一 ,在 网 络 编程 方面 有 着 特殊 性 ,因此 放 在 1. 2 节 单 独 
讲述 。Windows 是 主流 操作 系统 ,基于 Windows 的 网 络 应 用 非常 广泛 ,微软 公司 针对 
Windows 平台 提供 了 超 强 的 网 络 编程 技术 框架 ,1. 3 节 讲述 这 一 框架 体系 的 全 貌 , 指 导读 者 
在 开始 Windows 网 络 开发 之 前 能 够 全 局 在 胸 ,选择 正确 的 技术 路 线 。 


(d 网 络 编程 模型 


学 习 网 络 编程 技术 ,必须 理解 和 掌握 基本 的 网 络 编程 模型 。 本 节 遵 循 OSI 开放 互联 参 
考 模型 一 TCP/IP 协议 栈 模型 一 套 接 字 编 程 模 型 一 网 间 多 线程 会 话 模型 这 一 主线 为 初学 者 
介绍 网 络 编程 的 基础 知识 。 


1.1.1 开放 系统 互 连 参考 模型 


图 1.1 是 国际 标准 化 组 织 (ISO) 制 定 的 开放 系统 互 连 (Open System Interconnection, 
OSI) 参 考 模 型 。 这 个 模型 是 学 习 计算 机 网 络 的 理论 基础 ,也 是 学 习 网 络 编程 的 理论 基础 。 

OSI 自 底 层 向 上 把 网 络 通信 分 为 7 个 协议 层 , 分 别 是 物理 层 、 数 据 链 路 层 、 网 络 层 、 传 输 
层 会话 层 、 表 示 层 和 应 用 层 。 这 里 以 主机 A 与 主机 B 之 间 的 通信 为 例 , 在 通信 的 每 一 端 都 
H 7 层 协议 构成 一 个 协议 栈 , 用 于 定义 、 维 护 和 实现 端 到 端的 数据 通信 业务 。 中 间 路 由 部 分 
主要 完成 数据 的 交换 和 转发 ,对 应 网 络 层 以 下 的 三 层 协议 。 各 层 功 能 如 下 。 


1. 物理 层 
物理 层 为 数据 链 路 层 提 供 服务 ,通过 传输 介质 传输 比特 流 , 传 输 的 数据 单元 是 比特 
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(Bit) 。 该 层 定义 了 物理 链 路 的 建立 、 维 护 和 拆除 的 机 械 、 电 气 、 功 能 规范 ,包括 信和 号 线 的 功 

能 、 介 质 的 物理 特性 传输 速率 、 位 同步 .传输 模式 等 。 

OSI 协 议 栈 OSI 协议 栈 
应 用 层 psum 应 用 是 协议 —— -p AHA 
表示 层 [m---------- 表示 层 协议 一 一 一 一 一 一 一 一 一 一 -| 
会 话 层 pm---------- 会 话 层 协议 一 一 一 一 一 一 = 
传输 层 [uM 传输 层 协议 一 -一 一 一 一 一 一 一 一 -| 


网 络 层 m -- 网络 层 协议 -4 网 络 层 
数据 链 路 层 - 数据 链 路 层 协 议 J 实现 
物理 层 协议 | 一 物理 层 协议 一 -| 协议 物理 层 


|+ 
中 间 | 路 由 中 间 | 路 由 
- A 


通信 链 路 
主机 A 主机 B 
图 1.1 开放 系统 互 连 参考 模型 


2. 数据 链 路 层 


数据 链 路 层 为 网 络 层 提 供 服务 ,传输 的 数据 单元 是 数据 帧 (Data Frame) ,负责 完成 转换 
数据 成 帧 ,介质 访问 控制 ,物理 寻 址 、 差 错 控制 .流量 控制 等 功能 。 


3. 网 络 层 


网 络 层 为 传输 层 提供 服务 ,传输 的 数据 单元 是 数据 包 (Data Packet) ,负责 完成 从 源 主 
机 到 目标 主机 的 网 络 地 址 编 址 、 路 由 选择 、 报 文 转发 等 功能 。 


4. 传输 层 


传输 层 为 会 话 层 提供 服务 ,传输 的 数据 单元 是 报 文 段 (Data Segment) ,负责 完成 差错 控 
制 ,流量 控制 ,拥塞 控制 ,以 及 报 文 的 分 段 .重组 和 进程 寻 址 等 功能 。 


5. 会 话 层 
会 话 层 为 表示 层 提供 服务 ,实现 会 话 的 建立 、 维 护 、 同 步 和 终止 等 。 
6. 表示 层 


表示 层 为 应 用 层 提供 服务 ,完成 信息 的 表示 和 转换 ,包括 数据 的 加 密 解 密 、 压 缩 解压 缩 、 
编码 格式 转换 等 。 


7. 应 用 层 
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应 用 层 为 用 户 提供 服务 ,可 以 理解 为 网 络 程序 的 顶层 设计 。 

这 7 层 协议 ,下 面 三 层 是 通信 支持 层 , 完 成 端 到 端 通信 ; 上 面 三 层 是 应 用 支持 层 , 实 现 
应 用 设计 ; 中 间 的 传输 层 起 “承上启下 ”的 隔离 作用 ,使 网 络 应 用 的 开发 不 依赖 物理 网 络 的 
具体 实现 。 各 层 间 的 网 络 关系 可 以 进一步 归纳 为 表 1. 1。 


表 1.1 OSI 分 层 形态 与 功能 描述 


实体 分 层 | ”数据 形态 协议 层次 主要 功能 描述 
7. HHE 应 用 程序 进程 项 层 设 计 
xs Data 6. RRE 数据 格式 变换 .加密 解密 等 
5. 会 话 层 主机 内 部 模块 间 通 信 
ee 4 传输 层 端 对 端 连接 ,流量 控制 等 
' Packet 3. MAE TENE 
a 7 Fraine 2 数据 链 路 层 介质 访问 控制 \ 物 理 寻 址 等 
Bit 1. 物理 层 信号 传输 


1.1.2 TCP/IP 协议 栈 模型 


OSI 是 一 个 理想 模型 ,对 互联 网 的 发 展 具 有 指导 意义 。 但 要 将 7 层 协 议 均 严格 转化 为 
切实 可 行 的 网 络 结构 ,需要 完成 的 工作 量 非常 大 ,网 络 效率 也 不 一 定理 想 , 而 以 应 用 为 导向 
先行 发 展 起 来 的 TCP/IP 协议 栈 , 至 今 统治 着 互联 网 ,展现 出 强大 的 生命 力 , 成 为 互联 网 协 
议 的 事实 标准 。TCP/IP 协议 栈 自 下 而 上 可 以 归结 为 网 络 接 口 层 、 网 络 层 、 传 输 层 、 应 用 层 
四 层 结构 ,每 一 层 都 依赖 下 一 层 所 提供 的 服务 完成 本 层 工 作 。 图 1. 2 给 出 的 TCP/IP 协议 
栈 模型 是 对 TCP/IP 发 展 应 用 情况 的 高 度 归纳 和 抽象 。 


TCP/IP 协 议 栈 模型 ------------------------------ OSI 模型 
NRI E 应 用 层 
Telnet urre SMTP | POP3 四 DNS | DHCP | RIP |SNMP|… 表示 层 
会 话 层 
传输 层 TCP UDP 传输 层 
m es 
BUS ICMP [ IGMP 
IP 网 络 层 
ARP | RARP 
网 络 接口 层 BETTE 
各 种 底层 物理 网 络 (局 域 网 、 城 域 网 、 广 域 网 、 互 联网 …) 物理 层 


图 1.2 TCP/IP 协议 栈 模型 
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TCP/IP 协议 栈 模 型 包括 以 下 4 个 层次 。 
1. 网 络 接口 层 


TCP/IP 网 络 接口 层 对 应 OSI 的 物理 层 和 数据 链 路 层 。 物 理 层 定义 物理 介质 的 各 种 特 
性 ,如 机 械 特性 、 电 子 特性 、 功 能 特性 、 规 程 特性 。 数 据 链 路 层 负 责 接收 IP 数据 包 并 通过 网 
络 发 送 ,或 者 从 网 络 上 接收 物理 帧 ,抽出 IP 数据 包 交 给 IP 层 。 常 见 的 接口 层 协议 有 
Ethernet 802. 3, Token Ring 802. 5, X. 25, Frame Relay, HDLC,PPP ATM 等 。 


2. 网 络 层 


TCP/IP 网 络 层 负责 主机 之 间 的 通信 ,主要 功能 有 : (1) 处 理 来 自传 输 层 的 分 组 发 送 请 
求 。 收 到 请 求 后 ,将 分 组 装 入 IP 数据 报 ,填充 报头 ,选择 去 往 目 标 主机 的 路 径 , 然 后 将 数据 
报 发 往 适 当 的 网 络 接口 。(2) 处 理 来 自 网 络 接口 层 的 数据 报 。 首 先 检 查 其 合法 性 ,然后 进行 
寻 径 ,如 果 该 数据 报 已 到 达 目 标 主 机 , 则 去 掉 报 头 , 将 剩 下 的 部 分 交 给 传输 层 处 理 ; 如 果 该 
数据 报 尚 未 到 达 目 标 主 机 , 则 转发 该 数据 报 。(3) 处 理 路 径 .流量 控制 .拥塞 等 问题 。 

网 络 层 包 括 IPCInternet Protocol) 协议 .ICMP(Internet Control Message Protocol) 控 
制 报 文 协议 .ARP(CAddress Resolution Protocol) 地 址 解析 协议 .RARP(Reverse ARP) 反 向 
地 址 解析 协议 。 

IP 协议 是 网 络 层 的 核心 ,通过 路 由 选择 将 经 IP 封装 后 的 数据 报 交 给 网 络 接口 层 。IP 
数据 报 是 无 连接 服务 。 

ICMP 是 网 络 层 的 补充 ,可 以 回 送 报 文 , 用 来 检测 网 络 是 否 通畅 。Ping 命令 就 是 发 送 
ICMP 的 Echo Request 包 , 通 过 回 送 的 Echo Relay 进行 网 络 测试 。 

ARP 是 正 向 地 址 解析 协议 ,通过 已 知 的 IP 寻找 对 应 主机 的 MAC 地 址 。 

RARP 是 反 向 地 址 解析 协议 ,通过 MAC 地 址 确定 TP 地 址 。 


3. 传输 层 


传输 层 控 制 端 对 端 连接 ,包括 传输 控制 协议 TCP(Transmission Control Protocol) 和 用 
户 数据 报 协议 UDP(User Datagram Protocol) 。TCP 是 一 个 基于 连接 的 协议 ,通过 “三 次 握 
手 ” 提 供 可 靠 传 输 。UDP 则 是 面向 无 连接 服务 的 协议 ,不 保证 传输 的 可 靠 性 。 


4. 应 用 层 


应 用 层 协议 包括 FTP, Telnet, DNS, SMTP, NFS, HTTP 等 。FTP (File Transfer 
Protocol) 是 文件 传输 协议 ,Telnet 是 用 户 远程 登录 协议 .DNS(Domain Name Service) 是 域 
名 解析 协议 ,SMTP(Simple Mail Transfer Protocol) 是 简单 邮件 传输 协议 ,NFS(Network 
File System) 是 网 络 文件 系统 协议 , HTTP (Hypertext Transfer Protocol) 是 超 文 本 传输 
协议 。 

现在 将 TCP/IP 与 OSI 的 层次 对 应 关系 进一步 归纳 为 表 1.2, TCP/IP 简化 了 OSI 的 
会 话 层 和 表示 层 , 将 其 融合 为 应 用 层 , 使 得 通信 层次 减少 ,提高 了 通信 效率 。 同 时 ,TCP/IP 
还 简化 了 OSI 中 的 数据 链 路 层 和 物理 层 的 分 层 关 系 , 将 其 融合 为 网 络 接口 层 ,屏蔽 了 底层 
网 络 物理 拓扑 和 协议 实现 的 复杂 性 .使 得 TCP/IP 成 为 支持 异 构 网 络 互联 的 协议 。 
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表 1.2 TCP/IP 与 OSI 的 层次 对 应 关系 


OSI E 功 能 TCP/IP 协议 栈 TCP/IP 分 层 
应 用 层 | 文件 传输 .电子 邮件 ,文件 服务 虚拟 终端 | TET. HTTP. SNMP, FTP, 
SMTP,DNS,Telnet 等 应 用 层 
表示 层 。 | 数据 格式 化 .代码 转换 .翻译 .加 密 . 压 缩 ”| 没有 协议 
会 话 层 — | 对 话 控制 ,建立 同步 点 ( 续 传 ) 没有 协议 
提供 端 对 端的 接口 ,端口 寻 址 .分 段 重组 、 
传输 层 流量 .差错 控制 TCP,UDP 传输 层 
网 络 层 为 数据 包 选 择 路 由 ,逻辑 寻 址 、 路 由 选择 IP.ICMP,OSPF,EIGRP,IGMP | 网 络 层 
传输 有 地 址 的 帧 ,以 及 错误 检测 .转换 成 
数据 链 路 层 | 帧 ,物理 寻 址 、 流 量 控制 、 差 错 控制 、 接 人 |SLIP.CSLIP.PPP.MTU 
控制 等 功能 网 络 接口 层 
wm | 以 二 进 制 数据 形式 在 物理 媒体 上 传输 歼 


据 , 设 置 网 络 拓扑 结构 .比特 传输 、 位 同步 


ISO 2110 IEEE 802,IEEE 802. 2 


TCP/IP 协议 栈 中 包含 众多 协议 ,了 解 这 些 协议 是 如 何 工作 的 以 及 它们 之 间 是 如 何 配 
合 的 ,对 今后 的 网 络 编程 实践 很 有 帮助 。 观 察 图 1.1、 图 1.2 可 以 看 出 ,要 实现 网 络 上 两 台 
主机 之 间 的 通信 , 源 主机 应 用 程序 要 将 数据 封装 成 报 文 ,向 下 传输 交 由 传输 层 协议 人 处理; 传 
输 层 将 其 封装 成 报 文 段 , 交 由 网 络 层 ; 网 络 层 将 其 封装 成 数据 报 , 交 由 网 络 接 口 层 ; 网 络 接 
口 层 将 其 封装 成 帧 ,通过 物理 链 路 发 送 到 目标 主机 。 目 标 主 机 协议 栈 按照 反方 向 将 数据 逐 
层 解 封装 ,向 上 传递 ,最 终 到 达 目 的 应 用 程序 。 在 源 主机 和 目标 主机 两 端 ,数据 的 传输 过 程 
是 一 个 不 断 进行 数据 封装 和 解 封装 的 过 程 。 数 据 的 封装 和 解 封 装 应 该 交 由 何 种 协议 处 理 ， 
读者 可 以 参考 图 1. 3 所 示 的 协议 模块 之 间 的 协作 关系 进行 理解 。 


应 用 层 
进程 1 | | 进程 2 进程 3| | 进程 4| | 进程 5| | 进程 6 
80 dio 4 25 > 
i EI 
传输 层 ie | rnb 
AE 
网 络 层 ICMP 111 IGMP 
I 1 > IP |e 2 
ARP 0x0800 —0x0835 —=| RARP 
0x0806 i 
网 络 接口 层 Yt t 
网 络 接口 


图 1.3 TCP/IP 协议 栈 模型 


如 图 1.3 ,在 TCP/IP 协议 栈 模型 中 ,下 行 数据 的 封装 与 上 行 数据 的 解 封 装 互 为 反 向 操 
作 。 为 了 能 够 区 分 报 文 所 属 的 上 层 协 议 , 下 层 协议 在 封装 来 自 上 层 协议 的 报 文 时 会 在 首部 
加 入 区 分 上 层 协 议 的 字段 。 
TCP/IP 数据 在 封装 过 程 中 自 上 而 下 使 用 端口 地 址 (端口 号 ) .逻辑 地 址 (IP 地 址 )、 物 理 
地 址 三 级 地 址 模式 ,分 别 在 传输 层 、 网 络 层 和 网 络 接口 层 进行 变换 处 理 。 
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物理 地 址 又 称 硬件 地 址 或 MAC(Media Access Control) 地 址 ,在 数据 链 路 层 封 装 到 帧 
首部 ,用 来 在 物理 网 络 中 唯一 标识 网 络 节点 。 

逻辑 地 址 对 于 异 构 网 络 互联 是 必需 的 ,不 同 的 物理 网 络 , 物 理 地 址 格式 不 尽 相 同 , 因 此 
需要 一 种 统一 的 编 址 系统 来 唯一 地 标识 互联 网 上 的 每 一 台 主 机 。IP 数据 报 在 从 源 主 机 到 
目标 主机 的 传输 过 程 中 ,可 能 会 跨越 多 个 物理 网 络 。 在 这 期 间 , 标 识 源 主机 和 目标 主机 的 
IP 地 址 不 会 变化 ,而 在 跨越 物理 网 络 边界 时 ,标识 源 主机 和 目标 主机 的 物理 地 址 会 相应 地 

端口 地 址 又 称 端口 号 , 它 是 用 来 区 分 主机 中 的 不 同 进 程 的 。 端 口 地 址 的 长 度 是 16 位 ， 
取 值 范围 为 0 一 65 535, 

观察 图 1.3, 再 以 上 传 数据 的 解 封装 为 例 , 网 络 接口 层 收 到 了 物理 帧 之 后 ,根据 帧 首部 
的 “ 帧 类 型 ”字段 值 0x0800,0x0806 .0x0835 决定 把 帧 数据 分 别 交 给 IP 模块 .ARP 模块 、 
RARP 模块 处 理 ; 如 果 交 给 了 IP 模块 ,IP 模块 处 理 完 报 文 后 ,根据 IP 数据 报 首部 的 “协议 ” 
字段 值 1.2.6、17 决定 把 数据 分 别 交 给 ICMP 模块 .IGMP 模块 .TCP 模块 .UDP 模块 处 理 。 
TCP 和 UDP 则 分 别 根据 报 文 段 首部 的 端口 号 来 决定 交 由 哪个 应 用 进程 处 理 。 


1.1.3 和 套 接 字 编程 模型 


对 于 多 数 操作 系统 而 言 ,应 用 程序 和 操作 系统 程序 是 在 不 同 的 保护 模式 下 运行 的 。 应 
用 程序 一 般 不 能 直接 访问 操作 系统 内 部 的 资源 ,这 样 可 以 避免 应 用 程序 非法 破坏 操作 系统 
的 运行 。 为 此 ,操作 系统 需要 提供 应 用 程序 编程 接口 (Application Programming Interface. 
APDI) 给 应 用 程序 ,使 其 能 够 利用 操作 系统 提供 的 服务 。 对 于 网 络 操作 系统 而 言 ,需要 为 网 
络 应 用 程序 提供 网 络 编程 接口 实现 网 络 通信 。 目 前 ,多 数 操作 系统 提供 了 套 接 字 (Socket) 
接口 作为 网 络 编程 接口 。 

Berkeley 套 接 字 (BSD 套 接 字 ) 是 BSD 4. 2 UNIX 操作 系统 (于 1983 发 布 ) 提 供 的 一 套 
应 用 程序 编程 接口 ,是 一 个 用 C 语言 写成 的 网 络 应 用 程序 开发 库 , 主 要 用 于 实现 网 间 进 程 
通信 。Berkeley 套 接 字 后 来 成 为 其 他 现代 操作 系统 参照 的 事实 工业 标准 。Windows 操作 
系统 在 后 来 的 BSD 4. 3 版 基础 上 实现 了 自己 的 Windows Socket( 又 称 WinSock) 套 接 字 编 
程 接口 。 

图 1.4 比较 直观 地 描述 了 套 接 字 在 TCP/IP 协议 栈 中 的 位 置 关系 ,可 以 看 出 , 套 接 字 屏 
蔽 了 从 应 用 程序 直接 访问 传输 层 的 复杂 性 。 在 日 常生 活 中 ,两 个 人 打 电 话 , 电 话机 就 可 以 理 
解 为 通话 的 接口 ,只 要 用 户 会 用 电话 机 ,不管 电话 间 的 连接 如 何 复杂 ,通话 随时 随地 可 以 轻 
松 完 成 。 套 接 字 就 像 那个 电话 机 ,编程 者 只 要 掌握 了 套 接 字 技术 (类 似 电话 机 的 使 用 方法 )， 
那么 网 络 编程 (就 像 打 电话 ) 工 作 就 非常 简单 了 。 至 于 套 接 字 与 下 层 的 关系 , 则 由 操作 系统 
来 实现 和 封装 (如 图 1. 5 所 示 ) ,因此 , 套 接 字 简化 了 网 络 编程 。 

套 接 字模 块 负责 套 接 字 的 管理 与 维护 ,包括 套 接 字 的 创建 ` 地 址 的 关联 .连接 的 建立 E 
接 的 接受 、 套 接 字 的 关闭 以 及 数据 的 发 送 接收 等 。TCP/IP 协议 栈 的 套 接 字 编 程 接口 定义 
T 3 种 套 接 字 类 型 , 即 流 式 套 接 字 (SOCK_STREAM) .数据 报 套 接 字 (SOCK_DGRAM) 和 
原始 套 接 字 (SOCK_RAW)。 观 察 图 1. 5 可 以 看 出 这 3 种 套 接 字 的 一 些 特点 。 

流 式 套 接 字 提供 连接 服务 ,进行 双向 .可 靠 地 数据 传输 , 它 调 用 传输 层 的 TCP 模块 , 保 
证 数据 无 差错 、 无 重复 地 发 送 并 按 顺 序 接收 ,数据 被 看 成 是 字 节 流 ,无 长 度 限制 。 例 如 ， 


TCP/IP 协 议 栈 
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TCP/IP 协 议 栈 


传输 层 


网 络 接口 层 


ume |] Bi = 
EN. 套 接 字 规范 ----- 
mo — 传输 层 协议 -一 -一 一 一 一 一 一 
B= l. 网 络 层 协 议 - 一 -一 一 一 一 一 一 
网 络 接口 层 = 一- 物理 和 数据 链 路 层 协 说 - 

| 

4 层 

visée tirés 

SS 通信 链 路 

主机 A 

图 1.4 EEFT TCP/IP 协议 栈 中 的 位 置 关系 
应 用 程序 


进程 4| 


进程 5| on 


IGMP 


ARP 


RARP 


网 络 接口 层 


网 络 接口 


图 1.5 套 接 字 在 操作 系统 和 应 用 程序 间 的 位 置 关系 


HTTP 协议 .FTP 协议 等 都 使 用 流 式 套 接 字 。 


数据 报 套 接 字 提 供 无 连接 服务 ,调用 传输 层 的 UDP 模块 。 报 文 以 独立 包 的 形式 发 送 ， 
不 提供 无 差错 控制 ,数据 可 能 丢失 或 重复 ,顺序 也 可 能 混乱 。DHCP、DNS 等 应 用 层 协 议 使 


用 数据 报 式 套 接 字 。 


原始 套 接 字 允 许 应 用 进程 越过 传输 层 对 较 低层 次 协议 模块 (如 IP 模块 .ICMP 模块 ) 
直接 调用 和 访问 ,可 以 接收 发 向 本 机 的 ICMP, IGMP 报 文 , 或 者 接收 TCP 模块 .IP 模块 不 
能 处 理 的 数据 报 , 或 者 访问 设备 配置 信息 等 。 原 始 套 接 字 适合 网 络 监听 等 应 用 领域 的 


编程 。 


需要 指出 的 是 , 套 接 字 并 不 是 一 种 协议 , 它 只 是 操作 系统 提供 的 应 用 编程 接口 ,不 要 把 


它 理解 为 新 加 的 一 个 协议 层 ,因为 它 并 不 在 通信 两 端 进行 协议 约定 。 
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1.1.4 网 间 多 线程 会 话 模型 


进程 和 线程 都 是 操作 系统 的 概念 。 进 程 是 应 用 程序 的 执行 实例 ,每 个 进程 是 由 私有 的 
虚拟 地 址 空间 、 代 码 ,数据 和 其 他 各 种 系统 资源 组 成 的 ,进程 在 运行 过 程 中 创建 的 资源 随 着 
进程 的 终止 被 销毁 ,所 使 用 的 系统 资源 在 进程 终止 时 被 释放 或 关闭 。 

线程 是 进程 内 部 的 一 个 执行 单元 。 系 统 创建 好 进程 后 ,实际 上 就 启动 了 该 进程 的 主 执 
行 线程 。 每 一 个 进程 至 少 有 一 个 主 执行 线程 , 它 无 须 由 用 户主 动 创 建 , 而 是 由 操作 系统 自动 
创建 的 。 用 户 根 据 需要 在 应 用 程序 中 创建 其 他 线程 ,多 个 线程 并 发 地 运行 于 同一 个 进程 中 。 
一 个 进程 中 的 所 有 线程 都 在 该 进程 的 虚拟 地 址 空间 中 共同 使 用 这 些 虚 拟 地 址 空间 、 全 局 变 
量 和 系统 资源 ,所 以 线程 间 的 通信 非常 方便 ,多 线程 技术 的 应 用 也 较为 广泛 。 多 线程 可 以 实 
现 并 行 处 理 , 避 免 了 某 项 任务 长 时 间 独 占 CPU. 

对 于 网 络 应 用 程序 而 言 ,适合 采用 网 间 多 线程 编程 模型 ,如 图 1. 6 所 示 。 


服务 器 
服务 器 进程 Q 
EPMD LEE ESI 
an NE 
监 
N MENS ol Teise S. a 
程 | 建 A 会 话 2 Em 
客户 端 2 
USES i 
AE — 
CS T Y 
AFTN 


图 1.6 服务 器 和 客户 机 之 间 的 多 线程 会 话 模型 


观察 图 1.6, 在 客户 端 1, 如 果 采 用 单线 程 编程 模式 并 使 用 阻塞 模式 套 接 字 接收 数据 ,在 
不 能 及 时 得 到 服务 器 响应 时 ,客户 端 1 的 进程 界面 将 因 不 能 接受 用 户 的 任何 输入 而 处 于 假 
死 状态 。 反 之 ,如 果 客 户 端 1 的 进程 采用 多 线程 模式 , 则 可 以 有 效 避 免 上 述 问题 的 产生 。 同 
样 , 在 服务 器 端 , 面 对 大 量 并 发 客户 端的 请 求 , 采 用 多 线程 机 制 可 以 有 效 提高 服务 器 对 客户 
机 的 响应 能 力 。 所 以 ,开发 网 络 应 用 程序 ,无 论 是 在 客户 端 还 是 在 服务 器 端 一 般 采 用 多 线程 
编程 机 制 。 


© P2P 网 络 模型 


对 等 网 络 (Peer to Peer,P2P) 也 称 为 对 等 连接 ,其 本 意 是 网 络 中 的 每 个 参与 者 具有 同等 
的 能 力 , 既 是 消费 者 也 是 服务 提供 者 ,从 而 实现 "人 人 为 我 ,我 为 人 人 ”的 网 络 世 界 。 
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P2P 网 络 有 着 先天 的 发 展 基因 ,因为 TCP/IP 协议 本 身 是 不 区 分 网 络 地 位 的 ,这 意味 着 
网 络 中 通信 的 节点 在 底层 原本 是 平等 的 。P2P 网 络 和 C/S.B/S 网 络 不 同 。C/S、B/S 在 网 
络 中 必须 有 应 用 服务 器 ,用 户 的 请 求 需要 通过 应 用 服务 器 完成 ,用 户 之 间 的 通信 也 要 经 过 服 
务 器 。 而 在 对 等 网 络 中 ,用 户 之 间 可 以 直接 通信 .共享 资源 .协同 工作 ,网 络 中 的 各 主机 无 主 
从 之 分 。 对 等 网 络 是 在 现 有 网 络 的 基础 上 通过 软件 实现 的 ,被 广泛 用 于 文件 共享 、 网 络 视 
频 、 网 络 电话 、 网 格 计算 等 领域 ,以 分 布 式 资源 共享 和 并 行 计 算 的 模式 为 用 户 提供 更 好 的 
服务 。 


1.2.1 P2P 的 发 展 背景 


P2P 网 络 兴起 于 最 近 十 年 ,但 不 能 说 P2P 网 络 只 是 近 十 年 才 产 生 的 新 生 事物 。 它 的 起 
源 可 以 追溯 到 20 世纪 60 年 代 末 。P2P 网 络 的 发 展 按照 年 代 可 划分 成 3 个 历史 阶段 ,如 
图 1.7 所 示 。 
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图 1.7 P2P 发 展 历史 阶段 图 


一 是 P2P 史前 阶段 (1969 一 1995 年 )。 尽 管 严格 来 讲 , 这 二 十 多 年 的 时 间 并 没有 真正 的 
P2P 网 络 应 用 ,但 它 至 少 孕 育 了 P2P 的 网 络 思想 。 虽 然 这 个 时 期 没有 产生 PP 的 概念 ,但 
P2P 技术 的 火花 已 经 在 ARPANET 网 络 、Usenet 网 络 和 DNS 中 闪现 。Usenet 网 络 甚至 可 
以 称 为 现代 P2P 网 络 的 先行 者 。 

二 是 P2P 技术 停滞 阶 段 (1995 一 1999 年 )。 这 期 间 互 联网 开始 了 爆炸 式 增长 ,P2P 技术 
地 位 完全 让 位 于 客户 机 /服务 器 (C/S) 或 浏览 器 /服务 器 (B/S) 模 式 的 Web 服务 .FTP 服务 
等 互联 网 应 用 ,广大 工程 技术 人 员 热 衷 于 在 中 央 服 务 器 部 署 应 用 供 远程 客户 端 访问 的 C/S 
和 B/S 模式 开发 ,P2P 技术 遭遇 边缘 化 和 冷落 。 

三 是 P2P 技术 爆发 阶段 (1999 年 至 今 ) 。 在 这 一 阶段 ,P2P 技术 开始 爆发 和 流行 ,所 有 
这 一 切 都 是 由 Napster 引起 的 ,现在 Napster 被 业界 认为 是 第 一 代 P2P 技术 的 代表 。 
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1.2.2 三 代 P2P 网 络 
1. 第 一 代 P2P 


1998 年 ,美国 波士顿 东北 大 学 的 一 年 级 新 生 、18 岁 的 Shawn Fanning 为 了 解决 室友 提 
出 的 问题 ( 即 如 何在 网 上 轻松 找到 自己 喜爱 的 音乐 文件 ) 编 写 了 一 个 程序 一 一 Napster。 
Napster 能 够 搜索 音乐 文件 ,把 搜 到 的 音乐 文件 地 址 存放 在 一 个 中 央 服 务 器 中 ,使 用 者 能 够 
通过 检索 中 央 服 务 器 找到 所 需 文件 的 地 址 列表 。 到 了 1999 年 ,Napster 网 络 的 注册 用 户 有 
6000 万 ,这 在 当时 是 一 个 极为 稻 动 的 数字 。 

Napster 开创 了 对 等 网 络 文件 共享 的 先河 ,Napster 运行 机 制 如 图 1. 8 所 示 。 在 A 计算 
机 上 启动 Napster 软件 ,此 时 ,A 计算 机 成 为 一 个 可 以 给 其 他 Napster 用 户 提供 共享 文件 的 微 
型 服务 器 。A 计算 机 连接 到 Napster 的 中 央 服 务 器 , 它 会 告诉 中 央 服 务 器 A 计算 机 上 有 哪些 
文件 可 以 共享 。Napster 中 央 服 务 器 维护 一 个 由 Napster 计算 机 提供 的 共享 文件 索引 列表 。 


Napster 客 户 机 软件 


Napster 客 户 机 软件 


Napster 
C 计 算 机 


Napster 客 户 机 软件 
中 央 服 务 器 


B 计 算 机 


Napster 客 户 机 软件 
A 计 算 机 


图 1.8 Napster 工作 原理 图 
在 A 计算 机 上 输入 歌曲 名 为 “中 国 梦 ”的 查询 请 求 ,Napster 的 中 央 服务 器 就 会 返回 存 
储 有 这 首 歌 的 所 有 计算 机 列表 (B、C) 给 A 计算 机 。 用 户 从 列表 中 选择 这 首 歌 的 一 个 版 本 ， 
假设 选择 了 存放 在 B 计算 机 上 的 文件 索引 ,那么 A 计算 机 就 会 直接 连接 到 B 计算 机 ,并 直 
接 从 BB 计算机 上 下 载 “中 国 梦 "这 首 歌曲 。 


2. 第 二 代 P2P 


Gnutella 0. 4 是 继 Napster 之 后 备 受 欢迎 的 另 一 个 对 等 网 络 文件 共享 系统 。 和 Napster 
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一 样 ,用 户 将 共享 的 文件 放 到 个 人 计算 机 上 ,可 供 他 人 以 对 等 方式 下 载 。 每 台 计算 机 都 要 使 
用 Gnutella 软件 来 连接 Gnutella 网 络 。Gnutella 0. 4 与 Napster 的 不 同 之 处 是 没有 使 用 中 
央 服 务 器 存储 Gnutella 网 络 中 的 可 用 文件 索引 ,而 是 采用 分 布 式 查询 法 。 

这 里 以 用 户 在 A 计算 机 上 查询 音乐 文件 “中 国 梦 . mp3” 为 例 进 行 介绍 。 

A 计算 机 需要 至 少 知道 网 络 上 的 另 一 台 Gnutella 计算 机 B. A 计算 机 会 把 用 户 输入 的 
歌曲 名 称 发 送 给 它 所 知道 的 Gnutella 计算 机 B. 

收 到 请 求 的 计算 机 B 搜索 本 地 硬盘 来 查看 是 否 有 “中 国 梦 . mp3” 这 个 文件 。 如 果 有 ,B 
计算 机 就 会 将 文件 名 以 及 计算 机 的 IP 地 址 发 送 回 上 一 级 请 求 者 。 如 果 没 有 ,B 计算 机 会 将 
这 个 请 求 继续 发 送 给 与 B 相连 的 其 他 计算 机 ,其 他 计算 机 继续 重复 这 个 搜索 过 程 。 

如 果 网 络 规模 巨大 ,要 搜索 到 何 时 为 止 呢 ? 每 个 请 求 都 有 一 个 TTL( 生 存 时 间 ) 限 制 。 
一 个 请 求 在 停止 传播 之 前 可 能 会 传播 6 到 7 级 。 如 果 Gnutella 网 络 上 的 每 台 计 算 机 都 只 知 
道 男 外 4 台 计算 机 ,那么 这 意味 着 ,如 果 传 播 至 7 级 ,A 计算 机 发 出 的 请 求 可 能 会 到 达 约 
1X4X4X4X4X4X4 一 4096 台 其 他 的 Gnutella 计算 机 。 

Gnutella 网 络 在 应 用 上 存在 的 不 足 是 , (1) 不 能 保证 想 要 的 文件 能 在 可 以 联系 到 的 这 
4096 台 计 算 机 中 存在 。(2) 在 查询 文件 期 间 , 特 别 是 希望 收 到 7 级 深度 的 响应 时 ,响应 时 间 
可 能 较 长 ,用 户 会 等 得 不 耐烦 。(3) 发 出 请 求 的 计算 机 可 能 同时 收 到 其 他 计算 机 的 服务 请 
求 , 这 势必 会 影响 整体 查询 进度 ,增加 响应 时 间 。 


3. 第 三 代 'P2P 


为 了 克服 第 二 代 P2P 网 络 的 缺点 ,2001 年 第 三 代 P2P 登场 ,以 Gnutella 0. 4 网 络 的 升 
级 版 Gnutella 0.6、Kazaa 网 络 和 Juxtapose(JXTA) 网 络 为 代表 。 这 些 新 型 P2P 网 络 根据 
在 线 时 间 和 计算 机 的 性 能 将 P2P 网 络 中 的 计算 机 分 为 超级 节点 计算 机 (Super Node 
Computer) 和 叶子 节点 计算 机 (Leaf Node e e o? 
Computer) 两 类 。 超 级 节点 计算 机 性 能 较 好 ,在 线 ° 
时 间 长 ,可 以 充当 搜索 路 由 器 和 共享 文件 提供 者 。 
叶子 节点 计算 机 处 于 网 络 的 边缘 ,不 提供 搜索 路 
由 ,网 络 模型 如 图 1. 9 所 示 。 


这 一 时 期 还 产生 了 一 种 基于 分 布 式 喻 希 表 e é ¿ >’ 
(Distributed Hash Table, DHT) 的 结构 化 P2P 网 é o 9% 9 
络 搜索 技术 ,弥补 了 第 二 代 P2P 网 络 搜索 效率 的 超级 节点 计算 机 。 叶子 节点 计算 机 
不 足 , 典 型 的 应 用 有 Chord, Content Addressable 1.9 第 三 代 P2P 网 络 模型 


Network( CAN) , Pastry, Tapestry, Kademlia 等 。 


1.2.3 P2P 网络 分 类 


目前 ,P2P 网 络 按照 节点 间 的 组 织 关 系 可 以 分 为 非 结构 化 P2P、 结 构 化 P2P 和 混合 型 
P2P 三 类 ,如 图 1.10 所 示 。 非 结构 化 P2P 以 Gnutella 为 例 ,Gnutella 是 一 个 纯粹 的 P2P 系 
统 , 因 为 它 没有 中 央 服 务 器 ,在 Gnutella 网 络 中 ,每 台 机 器 既是 客户 机 又 是 服务 器 ,是 真正 
的 对 等 关系 ,所 以 被 称 为 对 等 机 (Servent,Server 十 Client 的 组 合 ) 。 

结构 化 P2P 网 络 主要 采用 DHT 技术 来 搜索 网 络 中 的 节点 , 按 搜索 优先 方向 又 可 分 为 
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广度 优先 和 深度 优先 两 类 。DHT 技术 的 典型 应 用 有 Tapestry, Pastry, Canon, Coral, 
Cyclone, HIERAS 等 。 

混合 型 P2P 综合 了 上 述 两 种 模式 的 优点 ,选择 性 能 较 高 (处 理 、 存 储 、 带 宽 等 方面 性 能 ) 
的 节点 作为 超级 节点 ,在 各 个 超级 节点 上 存储 了 系统 中 其 他 节点 的 信息 ,发现 算法 仅 在 超级 
节点 之 间 转 发 ,超级 节点 最 后 将 查询 结果 转发 给 适当 的 叶子 节点 。 其 典型 应 用 有 Kazaa、 
YAPPERS 等 。 


非 结构 化 P2P 


pm 结构 化 P2P K 


混合 型 P2P 


图 1.10 P2P 网 络 的 结构 化 分 类 


1.2.4 P2P 典型 应 用 举例 
文件 分 发 流 媒体 应 用 .语音 服 务 这 3 个 方面 的 应 用 是 P2P 的 热门 领域 。 
1. BitTorrent 


BitTorrent 软件 用 户 首先 从 Web 服务 器 上 获得 下 载 文件 的 种 子 文件 ,种子 文件 中 包含 
下 载 文件 名 和 数据 部 分 的 哈 希 值 , 以 及 一 个 或 者 多 个 索引 服务 器 地 址 。 它 的 工作 过 程 为 客 
户 端 向 索引 服务 器 发 一 个 HTTP GET 请 求 ,并 把 自己 的 私有 信息 和 下 载 文件 的 哈 希 值 放 
在 GET 的 参数 中 ; 索引 服务 器 根据 请 求 的 哈 希 值 查找 内 部 的 数据 字典 ,随机 返回 正在 下 载 
该 文件 的 一 组 节点 ,客户 端 连接 这 些 节点 下 载 需要 的 文件 片段 。 


2. eMule 


eMule 软件 基于 eDonkey 协议 作 了 改进 ,同时 兼容 eDonkey 协议 。 每 个 eMule 客户 端 
都 预先 设置 好 了 一 个 服务 器 列表 和 一 个 本 地 共享 文件 列表 ,客户 端 通过 TCP 连接 到 eMule 
服务 器 ,得 到 想 要 的 文件 信息 以 及 可 用 的 客户 端 信息 。 一 个 客户 端 可 以 从 多 个 其 他 的 
eMule 客户 端 下 载 同 一 个 文件 ,并 从 不 同 的 客户 端 取得 不 同 的 数据 片段 。eMnule 扩展 了 
eDonkey 的 能 力 ,允许 客户 端 之 间 互 相交 换 关于 服务 器 、 其 他 客户 端 和 文件 的 信息 。 


3. 迅雷 


迅雷 是 一 种 基于 多 资源 多 线程 技术 的 高 速 下 载 软件 。 迅 雷 的 技术 主要 分 成 两 个 部 分 ， 
一 部 分 是 对 现 有 Internet 下 载 资源 进行 搜索 整合 ,将 相同 校 验 值 的 信息 进行 聚合 。 当 用 户 
单 击 某 个 下 载 链接 时 ,迅雷 服务 器 按照 一 定 的 策略 返回 该 URL 信息 所 在 的 聚合 子 集 , 并 将 
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该 用 户 的 信息 返回 给 迅雷 服务 器 。 另 一 部 分 是 迅雷 客户 端 通过 多 资源 多 线程 技术 下 载 所 需 
要 的 文件 ,提高 下 载 速 率 。 多 资源 多 线程 技术 使 得 迅雷 在 不 降低 用 户 体验 的 前 提 下 对 服务 
器 资源 进行 均衡 ,有 效 地 降低 了 服务 器 负载 。 

用 户 通过 迅雷 下 载 的 文件 都 会 在 迅雷 的 服务 器 中 留 有 记录 , 当 新 用 户 再 次 下 载 同 样 的 
文件 时 ,迅雷 服务 器 会 在 它 的 数据 库 中 搜索 曾经 下 载 过 这 些 文件 的 老 用 户 , 让 这 些 老 用 户 扮 
演 服务 器 角色 ,为 新 用 户 提供 下 载 服务 。 


4. PPLive 


PPLive 软件 的 工作 机 制 和 BitTorrent 相似 。 用 户 启动 PPLive 以 后 ,从 PPLive 服务 器 
获得 频道 的 列表 ,用 户 单 击 感 兴趣 的 频道 ,然后 从 其 他 PPLive 节点 获得 数据 文件 ,使 用 流 
媒体 实时 传输 协议 (RTP) 和 实时 传输 控制 协议 (RTCP) 进 行 数据 的 传输 和 控制 。PPLive 
将 数据 下 载 到 本 地 主机 后 ,开放 本 地 端口 作为 视频 服务 器 ,再 为 其 他 PPLive 用 户 服务 。 


5. Skype 


Skype 是 网 络 语音 沟通 工具 , 它 可 以 提供 免费 的 、 高 清晰 的 语音 对 话 ,也 可 以 用 来 拨打 
国内 、 国 际 长 途 , 还 具备 即时 通信 所 需 的 其 他 功能 ,例如 文件 传输 、 文 字 聊 天 等 。Skype 是 在 
Kazaa 的 基础 上 开发 的 ,定义 了 两 种 类 型 的 节点 , 即 普通 节点 和 超级 节点 。 普 通 节 点 是 能 传 
输 语音 和 消息 的 功能 实体 ; 超级 节点 则 类 似 于 普通 节点 的 网 关 。 

Skype 即使 在 32kb/s 的 网 络 带宽 上 也 能 提供 高 质量 的 语音 。Skype 是 使 用 P2P 语音 
服务 的 代表 。 由 于 其 具有 超 清晰 语音 质量 、` 极 强 的 穿 透 防火 墙 能 力 、 免 费 多 方 通话 以 及 高 保 
密 性 等 优点 ,成 为 互联 网 上 使 用 最 多 的 PP 应 用 之 一 。 

总 之 ,P2P 网 络 的 流量 具有 分 布 非 均 衡 、 上 行 流量 与 下 行 流量 对 称 、 流 量 隐 项 等 特性 。 
P2P 网 络 的 应 用 种 类 繁多 形式 多 样 ,没有 统一 的 网 络 协议 标准 ,其 体系 结构 和 组 织 形式 还 
在 不 断 发 展 。 同 时 ,版 权 和 安全 等 制约 P2P 发 展 的 重大 技术 问题 急需 解决 。 


0.3 Windows 网 络 编程 


Windows 网 络 编程 一 般 指 基于 Windows 操作 系统 提供 的 网 络 编程 框架 实现 网 络 应 用 
的 开发 。 微 软 公司 围绕 Windows 平台 构建 了 一 个 包罗 万 象 的 .强大 的 网 络 编程 技术 体系 ， 
R 1.3 对 此 进行 了 归纳 , 列 出 了 32 个 网 络 编程 分 支 ,覆盖 了 32 种 应 用 领域 ,配合 这 个 庞杂 
的 技术 框架 ,微软 公司 提供 了 强力 集成 开发 环境 Visual Studio 来 帮助 编程 者 高 效 地 工作 。 


1.3.1 Windows 网 络 编程 框架 


表 1.3 列 出 了 32 个 方面 的 网 络 编程 应 用 领域 ,Windows Sockets 2(WinSock) 是 其 中 一 
个 分 支 ,处 于 基础 和 核心 地 位 ,本 书 重点 围绕 WinSock 技术 介绍 Windows 网 络 编程 和 应 
用 。 这 32 个 方面 的 编程 资料 和 APIE MSDN 上 有 详细 介绍 ,此 处 不 再 歼 述 。 

WinSock 是 Windows 系统 提供 的 一 种 使 用 传输 层 协议 进行 数据 传输 的 接口 规范 ,调用 
Socket 进行 通信 的 应 用 程序 不 需要 处 理 与 TCP 协议 相关 的 编程 细节 ,例如 三 次 握手 、 分 
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包 、 包 头 解析 、 重 传 、 滑 动 窗口 等 ,编程 者 不 必 再 劳 心 费力 。 使 用 套 接 字 进 行 通信 编程 ,就 像 
使 用 系统 中 的 I/O 函数 进行 输入 与 输出 。 
表 1.3 Windows 网 络 编程 框架 


分 支 编 程 框架 名 称 


对 应 的 编程 接口 


Domain Name System(DNS) 


域名 系统 应 用 程序 编程 接口 DNS API 


Dynamic Host Configuration Protocol(DHCP) 


动态 主机 配置 协议 应 用 程序 编程 接口 DHCP APT 


Fax Service 


局 域 网 传真 服务 应 用 程序 编程 接口 Fax Service 
API 


Get Connected Wizard API 


连接 向 导 应 用 程序 编程 接口 API 


HTTP Server API 


HTTP 服务 器 应 用 程序 编程 接口 API 


IP Helper 


互联 网 协议 助手 (IP 助手 )API 


Management Information Base 


管理 信息 库 应 用 程序 编程 接口 MIB API 


oo|w | 口上 四 | 


Message Queuing( MSMQ) 


消息 队列 应 用 程序 编程 接口 MSMQ API 


Multicast Address Dynamic Client Allocation 
Protocol. MADCAP) 


多 播 地址 动态 客户 端 分 配 协议 应 用 程序 编程 接口 
MADCAP API 


Network List Manager 


网 络 列表 管理 器 应 用 程序 编程 接口 API 


Network Management 


网 络 管理 应 用 程序 编程 接口 API 


Network Share Management 


网 络 共享 管理 应 用 程序 编程 接口 API 


Peer-to-Peer 


P2P 网 络 应 用 程序 编程 接口 API 


Quality-of-Service( QoS) 


质量 服务 应 用 程序 编程 接口 QoS API 


Remote Procedure Call(RPC) 


远程 过 程 调用 应 用 程序 编程 接口 RPC API 


Routing and Remote Access Service 


远程 访问 服务 应 用 程序 编程 接口 RAS API 


Simple Network Management Protocol 


简单 网 络 管理 协议 应 用 程序 编程 接口 SNMP API 


SMB Management API 


SMB 管理 应 用 程序 编程 接口 API 


Telephony Application Programming Interfaces 
(TAPD 


电话 应 用 程序 编程 接口 TAPI 


Teredo 


Teredo IPv6 转换 应 用 程序 编程 接口 API 


WebSocket Protocol Component API 


WebSocket 协议 组 件 应 用 程序 编程 接口 API 


Windows Filtering Platform 


Windows 过 滤 平 台 应 用 程序 编程 接口 WFP API 


Windows Firewall Technologies 


Windows 防火 墙 应 用 程序 编程 接口 WFT API 


Windows Networking( WNet) 


Windows 网 络 功能 应 用 程序 编程 接口 WNet API 


Windows Network Virtualization 


Windows 网 络 虚 拟 化 应 用 程序 编程 接口 API 


Windows RSS Platform 


Windows RSS 平 台 应 用 程序 编程 接口 API 


Windows Sockets 2 


Windows Sockets(Windows 套 接 字 , WinSock) 应 用 
程序 编程 接口 WinSock API 


Windows Web Services API 


Windows Web 服务 应 用 程序 编程 接口 WWSAPI 


WebDAV 


Web 分 布 式 创作 和 版 本 控制 应 用 程序 编程 接口 
WebDAV API 


Windows HTTP Services WinHTTP) 


Windows HTTP 服务 应 用 程序 编程 接口 WinHTTP 
API 
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XML HTTP Request 2 


XML HTTP 请 求 2 应 用 程序 编程 接口 API 
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Windows Internet( WinInet) 


Windows 互联 网 (WinInet) 应 用 程序 编程 接口 API 
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1.3.2 Windows 网 络 协议 


学 习 Windows 网 络 编程 ,有 必要 熟悉 Windows 操作 系统 支持 的 各 种 协议 , 它 关系 到 编 
程 者 在 开发 具体 应 用 之 前 对 网 络 程序 适用 范围 的 判断 和 技术 路 线 的 选择 , 表 1. 4 是 不 同 版 
本 Windows 系统 对 网 络 协议 的 支持 情况 。 


表 1.4 Windows 操作 系统 对 网 络 协 议 的 支持 


协议 Windows 7 Windows Windows Windows Windows XP Windows 
Server 2008 Vista Server 2003 2000 
IPv6 支持 支持 支持 支持 支持 不 支持 
IPv4 支持 支持 支持 支持 支持 支持 
NetBIOS 支持 支持 支持 支持 支持 支持 
IDA 支持 支持 支持 支持 支持 支持 
Bluetooth 支持 支持 支持 支持 支持 不 支持 
IPX/SPX 不 支持 不 支持 不 支持 支持 支持 支持 
AppleTalk 不 支持 不 支持 不 支持 支持 支持 支持 
DLC 不 支持 不 支持 不 支持 不 支持 不 支持 支持 
ATM 不 支持 不 支持 不 支持 支持 支持 支持 
NetBEUI 不 支持 不 支持 不 支持 不 支持 不 支持 支持 


1.3.3 Windows Sockets 编程 模型 


Windows Sockets 源 于 Berkeley Software Distribution BSD 4. 3 版 ) 中 的 UNIX 套 接 
"EM. Windows Sockets 思想 萌芽 于 1991 年 秋天 TCP/IP 网 络 行业 的 一 个 商业 展会 上 ， 
Stardust 公司 的 Martin Hall 召集 了 一 个 非 正式 的 “同行 ?聚会 ,会 议 的 主题 是 讨论 在 
Windows 平台 上 为 TCP/IP 应 用 建立 标准 API 的 可 能 性 。 会 议 一 致 认为 : 一 套 标准 的 网 
络 API 对 业界 的 发 展 是 必 不 可 少 的 ,已 有 的 Berkeley Sockets API 是 可 借鉴 的 模板 ,而 
DLL 技术 则 是 最 灵活 的 载体 。 

1992 年 6 月 ,Windows Sockets 规范 工作 组 发 布 了 Windows Sockets(WinSock) 规 范 的 
1.0 版 本 。1993 年 1 月, 发布 了 修正 后 的 1. 1 版 本 。 

Windows Sockets 是 一 个 开放 的 标准 ,定义 了 良好 的 接口 ,使 不 同 软件 供应 商 的 产品 之 
间 能 够 互 操作 。Windows Sockets 规范 一 经 推出 , 即 获得 了 多 数 网 络 软 件 开 发 商 的 支持 , 涌 
现 出 大 量 的 Windows Sockets 应 用 软件 。 例 如 , WinSock 在 Web 浏览 器 先驱 Mosaic 的 开 
发 中 发 挥 了 重要 的 作用 。 

此 后 , Windows Sockets 规范 几经 修订 ,1997 年 发 布 了 WinSock2( 版 本 号 2. 2. 2) ,使 得 
WinSock2 最 终 成 为 一 个 非常 成 熟 、 稳 定 的 开发 架构 。 虽 然 这 个 规范 的 版 本 号 没有 再 变 , 但 
随 着 Windows 操作 系统 的 不 断 升 级 、 换 代 , WinSock2 API 也 与 时 俱 进 ,伴随 着 操作 系统 的 
发 展 而 发 展 。 

与 Windows Sockets 规范 1. 1 版 本 只 针对 TCP/IP 不 同 , WinSock2 API 在 完整 保留 
1.1 版 本 原 有 内 容 的 基础 上 加 入 了 很 多 扩展 ,表现 在 以 下 方面 。 

(1) WinSock2 定义 了 通用 API, 人 允许 创建 独立 于 协议 的 网 络 应 用 ,这 些 应 用 对 下 层 网 
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络 协 议 没 有 任何 选择 性 的 要 求 , 用 户 无 须 对 当前 安装 在 机 器 中 的 任何 协议 (例如 TCP/IP, 
IPX/SPX) 做 任何 修改 ,如 图 1. 11 所 示 。WinSock2 同时 支持 IPv4 和 IPv6 编程 ,这 是 1. 1 
版 做 不 到 的 。 


Windows Socket Applications 


Windows Socket | 
TCP | UDP | TCP UDP 
IGMP| ICMP ND| MLD 
IP IPv6 ICMPv6 
ARP ARP 
NDIS 
Ethernet Token Ring Frame Relay ATM 


图 1.11 WinSock2 支持 IPv4 和 IPv6 


(2) WinSock2 遵循 Windows 开放 式 系统 体系 结构 (Windows Open System Architecture, 
WOSA) 规 范 ,实现 了 一 种 新 架构 ,同时 支持 动态 名 称 解析 服务 和 传输 服务 ,编程 模型 如 
图 1.12 所 示 。 由 Windows Sockets 2 API 十 ws2_32. dll+ (Windows Sockets 2 Transport 
SPI, Windows Sockets 2 Name Space SPT) 搭 建 的 层次 编程 框架 彻底 屏蔽 了 底层 物理 网 络 


Windows Sockets 2 Windows Sockets 2 
Application Application 


Windows Sockets 2 


API 
传输 服务 函数 名 称 解 析 服 务 函 数 
ws2_32.dll 
Windows Sockets 2 Windows Sockets 2 
Transport SPI Name Space SPI 

Transport | | Transport Name Space | | Name Space 

Service Service Service Service 

Provider Provider Provider Provider 


1.12 WinSock2 编程 模型 


(3) WinSock2 增强 了 基于 TCP/IP 协议 的 扩展 支持 ,例如 支持 原始 Socket 4l Ah COut- 
of-Band,OOB) 设 置 、. 生 存 时 间 (Time-to-Live,TTL) 设 置 以 及 多 播 。 
另外 ,WinSock2 增加 了 对 服务 质量 (Quality-of-Service, QoS) 规 范 的 支持 ,增强 了 对 
ATM ISDN 这 类 数据 链 路 层 协 议 的 支持 .解决 了 移动 计算 中 新 媒体 应 用 的 特殊 需求 问题 。 
(4) WinSock2 允许 在 网 络 L/O 期 间 向 多 个 缓冲 区 写 人 和 从 多 个 缓冲 区 直接 读 取 的 操 
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作 , 并 针对 多 媒体 应 用 增加 了 可 指定 优先 级 的 Socket 组 ,在 带宽 有 限 的 情况 下 可 以 保证 一 
个 数据 流 的 处 理 优先 于 其 他 数据 流 。 

(5) WinSock2 支持 异步 1/0 和 事件 对 象 。 

(6) WinSock2 提供 了 数据 连接 和 连接 断 开 功能 ,以 及 对 连接 请 求 的 有 条 件 接 纳 功能 ， 
定义 了 独立 于 协议 的 .用 于 多 点 和 多 播 支持 的 API。 


1.3.4 WinSock2 工作 模式 


WinSock2 有 3 种 工作 模式 , 即 阻塞 模式 、 非 阻塞 模式 和 异步 模式 ,3 种 工作 模式 的 比较 
如 图 1.13 所 示 。 


阻塞 模式 FARRER 异步 模式 
| 等 待 完成 查 询 可 做 想 做 的 任何 事情 | 一 | WinSock 
ee D uuu gp aar U [ES 
WinSock 函数 | 消息 m WinSock 
函数 调用 — 返回 通知 ARI 
| | WinSock 
[rie 处 理 … 完 网 “以 起 … 处 理 … sek] [Eee o 处 理 … ef | DLL 


(a) (b) (c) (d) 
图 1.13 3 种 WinSock2 工作 模式 比较 


1. 阻塞 模式 


如 图 1. 13(a) 所 示 ,阻塞 模式 指 在 发 出 一 个 功能 调用 后 ,在 没有 得 到 结果 之 前 ,该 调用 
不 返回 。 通 俗 的 解释 是 ,只 有 一 件 事情 做 完了 ,才能 做 下 一 件 事 情 。 换 而 言 之 ,后 面 的 事情 
必须 等 前 一 件 事情 完成 才能 开始 。 例 如 , 当 调 用 套 接 字 的 recvO 〇 函数 时 , 套 接 字 首先 检查 组 
冲 区 是 否 有 准备 好 的 数据 ,如 果 没 有 准备 好 的 数据 ,那么 套 接 字 就 处 于 阻塞 状态 ;如果 数据 
准备 好 了 ,将 数据 从 缓冲 区 读 取 到 用 户 程序 ,recv() 函数 才 返回 。 

当 使 用 WinSock API 中 的 socket() 函 数 和 WSASocket() 函 数 创建 套 接 字 时 ,默认 的 套 
接 字 都 是 阻塞 的 ,但 bind() 和 listen() 函 数 例外 ,函数 会 立即 返回 。WinSock 中 可 能 阻塞 的 
套 接 字 调用 有 以 下 4 种 。 

(1) 输入 操作 : recv() recvfrom()、\WSARecv() 和 WSARecvfrom O PR, "4 454 E 
处 于 阻塞 模式 时 ,如 果 套 接 字 缓 冲 区 中 没有 数据 可 读 , 则 调用 线程 在 数据 到 来 之 前 一 直 
阻塞 。 

(2) 输出 操作 : send() ,sendto()\WSASend() 和 WSASendto() 函 数 。 当 套 接 字 处 于 
阻塞 模式 时 ,调用 这 4 个 函数 发 送 数 据 ,如 果 套 接 字 缓 冲 区 中 没有 可 用 数据 , 则 调用 线程 在 
数据 准备 好 之 前 一 直 阻 塞 。 

(3) 接受 连接 : accept() 和 WSAAcept O 函数 。 当 套 接 字 处 于 阻塞 模式 时 ,调用 这 两 个 
函数 等 待 接受 外 来 的 连接 请 求 ,如 果 此 时 没有 连接 请 求 , 则 调用 线程 在 新 连接 到 达 之 前 会 一 
直 阻 塞 。 

(4) 外 出 连接 : connect() 和 WSAConnect O FRI, XJ T TCP 连接 , 当 套 接 字 处 于 阻塞 
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模式 时 ,调用 这 两 个 函数 向 服务 器 发 起 连接 ,这 两 个 函数 在 收 到 服务 器 的 应 答 之 前 不 会 返 
回 。 这 意味 着 TCP 连接 会 阻塞 等 待 至 少 一 次 的 服务 器 往返 时 间 。 

使 用 阻塞 模式 套 接 字 开发 网 络 程序 步骤 简单 容易 实现 。 在 希望 立即 发 送 和 接收 数据 ， 
且 处 理 的 套 接 字 数量 较 少 的 情况 下 ,可 以 使 用 阻塞 模式 开发 网 络 程序 。 

阻塞 模式 套 接 字 的 不 足 是 不 适合 在 大 量 建立 好 的 套 接 字 线程 之 间 通 信 。 当 使 用 "生产 
者 一 消费 者 ”模型 开发 网 络 程序 时 ,如 果 为 每 个 套 接 字 都 创建 一 个 读 线程 .一 个 数据 处 理 线 
程 和 一 个 用 于 同步 的 事件 ,无 疑 会 增加 系统 的 开销 。 


2. 非 阻塞 模式 


非 阻 塞 和 阻塞 的 概念 相对 应 ,在 不 能 立刻 得 到 结果 时 ,recv() 函数 不 会 阻塞 当前 线程 ， 
而 是 立刻 返回 。 如 图 1.13(b) 所 示 , 非 阻塞 模式 多 次 调用 , 均 马 上 返回 ,但 在 数据 处 理 的 过 
程 中 ,调用 线程 是 阻塞 的 。 

把 套 接 字 设 置 为 非 阻塞 模式 , 当 所 请 求 的 函数 操作 无 法 完成 时 ,发 出 调用 的 线程 不 会 被 
阻塞 ,而 是 返回 一 个 错误 码 。 这 样 ,调用 线程 将 不 断 地 测试 数据 是 否 已 经 准备 好 ,如 果 没 有 
准备 好 ,继续 测试 ,直到 数据 准备 好 为 止 。 在 这 个 不 断 测试 的 过 程 中 ,会 大 量 占用 CPU 的 
时 间 。 

如 图 1. 13(b) 所 示 ,假设 有 一 个 非 阻 塞 模式 套 接 字 多 次 调用 recv() 函数 读 取 数 据 ,前 3 
次 调用 recv O 函数 时 , 套 接 字 缓 冲 区 中 的 数据 还 没有 准备 好 ,因此 ,该 函数 立即 返回 
WSAEWOULDBLOCK 错误 码 。 在 第 4 次 调用 recv() 函 数 时 ,数据 已 经 准备 好 ,被 复制 到 
应 用 程序 的 缓冲 区 中 ,recv() 函 数 返 回 成 功 指示 ,应 用 程序 开始 处 理 数据 。 

socket() 函 数 和 WSASocket() 函数 创建 的 套 接 字 默 认 是 阻塞 的 。 在 创建 套 接 字 之 后 ， 
可 以 调用 ioctlsocket ) 函数 将 其 设置 为 非 阻塞 模式 ,还 可 以 使 用 WSAAsyncSelect() 和 
WSAEventSelectO 函数 。 当 调用 这 两 个 函数 时 , 套 接 字 会 被 自动 地 设置 为 非 阻塞 模式 。 

套 接 字 被 设置 为 非 阻 塞 模式 后 ,被 调 WinSock API 函数 会 立即 返回 。 在 大 多 数 情 况 
下 ,这 些 函 数 调用 都 会 “失败 ”, 并 返回 WSAEWOULDBLOCK 错误 码 , 说 明 请 求 的 操作 在 
调用 期 间 内 没有 完成 。 通 常 ,应 用 程序 需要 重复 调用 该 函数 ,直到 获得 成 功 为 止 。 

并 非 所 有 的 WinSock API 在 非 阻 塞 模式 下 调用 ,都 会 返回 WSAEWOULDBLOCK 错 
误 。 例 如 ,在 调用 bind OO 函数 时 就 不 会 返回 该 错误 码 。 当 然 ,在 调用 WSAStartupO 函数 时 
更 不 会 返回 该 错误 码 , 因 为 该 函数 是 应 用 程序 初始 调用 的 函数 。 

由 于 使 用 非 阻塞 模式 套 接 字 调用 函数 时 ,会 经 常 返 回 WSAEWOULDBLOCK 错误 码 ， 
所 以 ,在 任何 时 候 , 都 应 仔细 检查 返回 码 并 做 好 应 对 准备 。 这 里 以 读 取 数 据 为 例 , 一 般 需要 
构造 一 个 循环 ,在 循环 体内 不 断 地 调用 recv O 函数 。 这 种 做 法 相 比 异步 模式 其 实 是 很 费 资 
源 的 。 

非 阻塞 模式 套 接 字 与 阻塞 模式 套 接 字 相 比 ,不 容易 使 用 。 使 用 非 阻 塞 模式 套 接 字 ,需要 
编写 更 多 的 代码 ,以 便 在 每 个 WinSock API 函数 调用 中 对 收 到 的 WSAEWOULDBLOCK 
错误 进行 处 理 。 但 是 , 非 阻 塞 模式 套 接 字 在 控制 建立 多 个 连接 , 且 数 据 的 收发 量 不 均 、 时 间 
不 定时 ,具有 明显 优势 。 

在 实践 中 通常 考虑 使 用 套 接 字 的 “I/O 模型 ,对 并 发 连接 数量 大 的 通信 进行 更 加 高 效 
的 管理 。 
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3. 异步 模式 


一 个 异步 调用 发 出 后 ,即使 该 调用 不 能 立刻 得 到 结果 也 要 返回 ,结果 的 取得 是 通过 状 
态 . 通 知 和 回调 机 制 来 通知 调用 者 的 。 如 图 1. 13(c) 所 示 , 套 接 字 发 出 调用 后 不 需要 知道 该 
调用 的 结果 就 立即 返回 , 剩 下 的 工作 交 给 系统 消息 驱动 机 制 , 系 统 侦 测 到 结果 后 会 向 套 接 字 
发 出 通知 消息 , 套 接 字 再 回调 相应 的 函数 进行 处 理 。 

异步 模式 是 非 阻 塞 的 ,因为 它 在 操作 完成 之 前 就 返回 了 。WinSock2 异步 模式 的 编码 
与 BSD 套 接 字 不 兼容 ,限制 了 程序 的 可 移植 性 ,这 是 因为 WinSock2 的 异步 模式 利用 了 
Windows 的 消息 处 理 机 制 ,这 一 点 与 BSD 套 接 字 有 很 大 的 不 同 。 在 Windows 平台 上 做 开 
发 ,建议 选用 异步 模式 ,因为 它 具 有 更 高 效 的 数据 吞吐 和 并 发 能 力 。 

关于 阻塞 、 非 阻塞 \ 异 步 套 接 字 编程 的 详细 内 容 , 留 在 第 2 章 的 案例 中 讲述 。 


1.3.5 第 一 个 网 络 程序 一 一 hostent 


当 客 户 机 程序 访问 另 一 台 网 络 主机 时 ,需要 指定 目标 主机 的 网 络 地 址 。 在 通常 情况 下 ， 
客户 机 程序 不 知道 目标 主机 的 地 址 ,只 知道 它 的 主机 名 。 例 如 ,用 浏览 器 访问 www. 163. 
com, 使 用 的 是 主机 名 ,不 是 网 络 地 址 。 但 是 网 络 通信 过 程 中 需要 的 是 主机 地 址 ,而 不 是 主 
机 名 。 因 此 ,客户 机 需要 明确 目标 主机 名 称 对 应 的 网 络 地 址 是 什么 ? 得 到 答案 的 过 程 就 是 
主机 名 称 解析 的 过 程 。 

服务 器 接受 客户 机 连接 的 请 求 中 往往 包含 了 客户 机 地 址 ,在 某 些 情况 下 ,服务 器 需要 知 
道 客 户 机 的 主机 名 ,这 时 需要 把 客户 机 地 址 解析 成 主机 名 ,这 个 过 程 称 为 地 址 解析 。 该 过 程 
与 主机 名 称 解析 相反 。 

在 WinSock API 中 ,用 gethostbyname() 和 WSAAsyncGetHostByNameO 函数 实现 主 
机 名 称 解析 ,用 gethostbyaddr() 和 WSAAsyncGetHostBy Addr O PR Zi Sz Bj Hb hl: fit Br ç 

WinSock API 定义 了 一 个 hostent 结构 ,该 结构 记录 主机 的 信息 ,包括 主机 名 主机 别 
名 、 地 址 类 型 .地 址 长 度 和 地 址 列表 。hostent 的 结构 定义 如 下 : 


typedef struct hostent { 


char FAR * h name; // 主 机 名 

char FAR FAR **h aliases; // 主 机 别名 
short h addrtype; // 地 址 类 型 
short h_length; // 地 址 长 度 
char FAR FAR **h addr list; // 地 址 列表 


} HOSTENT, * PHOSTENT, FAR * LPHOSTENT; 


gethostbyaddrO fll gethostbyname O 函数 在 完成 主机 地 址 解析 和 名 称 解析 时 ,返回 一 
个 指向 结构 体 hostent 的 指针 ,或 者 是 一 个 空 指针 (NULL)。 

有 很 多 的 语言 类 教科 书 , 第 一 个 程序 都 是 从 “Hello World!1” 开 始 。 那 么 ,网 络 编程 的 第 
一 个 程序 不 妨 从 hostent 开始 ,尽管 这 个 程序 只 能 进行 主机 的 名 称 和 地 址 解析 ,似乎 看 不 到 
网 络 通信 和 协作 的 影子 ; 尽管 读者 初次 接触 这 个 程序 似乎 困难 重重 ,不 过 很 快 就 会 发 现 ,这 
只 是 访问 网 络 的 开端 ,是 最 容易 掌握 的 一 个 例子 。hostent 的 代码 如 程序 1. 1 所 示 。 
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程序 1.1 主机 名 称 和 地 址 解析 完整 代码 


//hostent. cpp 
f define WIN32 LEAN AND MEAN 


# include < winsock2.h» 
# include < ws2tcpip.h» 
# include < stdio.h» 


// 链 接 ws2_32. lib 
# pragma comment(lib, "ws2_32.1ib") 


int main(int argc, char ** argv) 


( 


// 声 明和 初始 化 变量 
WSADATA wsaData; 
int iResult; 


DWORD dwError; 
int i = 0; 


struct hostent * remoteHost; 
char * host name; 
struct in addr addr; 


char ** pAlias; 


// 校 验 命令 行 参数 

if (argc != 2) { 
printf(" 用 法 : % s ipv4address\n", argv[0]); 
printf(" orn"); 


printf(" % s hostnaneW", argv[0]) ; 
printf(" 主机 名 称 解析 \n" ); 
printf(" % s 127.0.0. 1A", argv[0]); 
printf(" 网 络 地 址 解析 \n" ); 
printf(" % s www. 163. con Wn", argv[0]) ; 
return 1; 

} 

// 初 始 化 WinSock 服务 


iResult = WSAStartup(MAKEWORD(2, 2), &wsaData); 

if (iResult != 0) ( 
printf("WinSock 服务 启动 失败 : % dn", iResult); 
return 1; 


) 


host name = argv[1]; 


// 如 果 输 入 的 是 主机 名 ,使 用 gethostbynane( ) SEPT 
// 否 则 ,使 用 gethostbyaddr() 解 析 (假定 地 址 类 型 为 IPv4) 


if (isalpha(host name[0])) ( /* 主机 名 称 解 析 * / 
printf("Calling gethostbyname with % s\n", host name); 
remoteHost - gethostbyname(host name); 

} else { 
printf ("Calling gethostbyaddr with % s\n", host name); 
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addr.s addr = inet addr(host name); 
if (addr.s addr == INADDR NONE) ( 
printf("IPv4 地 址 格式 不 正确 !\n"); 
return 1; 
} else 
remoteHost = gethostbyaddr((char * ) &addr, 4, AF INET); 
j 


if (remoteHost == NULL) ( 
dwError = WSAGetLastError(); 
if (dwError != 0) ( 
if (dwError -- WSAHOST NOT FOUND) { 
printf(" X fL iE S£ Sl! Vn") ; 
return 1; 
} else if (dwError == WSANO DATA) { 
printf(" 无 查询 结果 返回 !\n") ; 
return 1; 
) eise ( 
printf(" 主 机 解析 错误 , 错误 码 : 1dVn", dwError); 


return 1; 


} 
) else ( 
printf(" 解 析 结 果 :\n"); 
printf("\t 主机 名 称 : % s\n", remoteHost -» h name); 
for (pAlias = remoteHost ->h aliases; * pAlias != 0; pAlias**) ( 
printf("\t 主机 别名 : # &d: $sW", ++i, * pAlias); 
) 
printf("\t 地 址 类 型 : "); 
Switch (remoteHost 一 > h addrtype) ( 
case AF INET: 
printf("AF INETin"); 
break; 
case AF INET6: 
printf("AF INET6 n"); 
break; 
case AF NETBIOS: 
printf("AF NETBIOSW"); 
break; 
default: 
printf(" %d\n", remoteHost 一 > h_ addrtype); 
break; 
i 
printf("Vt 地 址 长 度 : & dVn", remoteHost -» h length); 


if (remoteHost 一 > h addrtype == AF INET) ( 
i-20; 
while (remoteHost -» h addr list[i] != 0) ( 
addr.s addr = * (u long * ) remoteHost -» h addr list[i**]; 
printf("\tIPv4 地 址 # % d: % s\n", i, inet ntoa(addr)); 
i 
} else if (remoteHost -» h addrtype == AF INET6) 
printf("\t 远程 主机 为 IPv6 地 址 \n"); 
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return 0; 


} 

初学 者 也 可 以 跳 过 这 个 程序 ,直接 进入 第 2 章 的 学 习 。 这 个 小 程序 主要 告诉 读者 ,网 络 
编程 有 一 系列 问题 需要 解决 ,主机 名 称 和 地 址 解析 只 是 其 中 的 一 部 分 。 如 果 读 者 对 
VS2010 开发 环境 熟悉 ,也 可 以 照 葫 芦 画 杜 地 编译 测试 这 个 小 程序 。 图 1. 14 给 出 了 该 程序 
的 运行 测试 界面 。 

首先 用 hostent localhost 命令 测试 主机 名 称 解析 ,然后 用 hostent 127. 0. 0. 1 命令 测试 
地 址 解析 。 图 1. 14 清晰 地 显示 了 命令 的 执行 结果 。 接 着 用 hostent www. 163. com 命令 测 
试 远程 主机 名 称 的 解析 ,结果 如 图 1. 15 所 示 , 即 返回 了 网 易 服务 器 主机 名 和 地 址 列表 信息 。 


= C:\WINDOWS\system32\cmd. exe MA 


Vhostent wwu-163-com 
thynane with ww.163.com 


scache .g1h8. lxdns -com 
wv. 163. com 
82: wwu.163.com.lxdns.con 
: ñF_INET 
4 
Hi: 61.156.243.49 


V. $1: 127.0.9.1 hL "2: 60.210.18.169 


图 1.14 解析 本 地 主机 名 称 和 地 址 图 1.15 解析 远程 主机 名 称 


习题 1 


L OSI 参考 模型 对 学 习 网 络 编程 有 何 指导 意义 ? 

2. 简 述 TCP/IP 协议 栈 的 工作 原理 

3. 套 接 字 与 TCP/IP 协议 栈 是 一 种 什么 关系 ? 与 操作 系统 又 是 什么 关系 ? 
A. 为 什么 网 络 编程 宜 采用 多 线程 技术 ? 

5. 简 述 Napster 的 工作 原理 ,列举 几 个 你 熟知 的 P2P 应 用 。 
6. 简 述 Gnutella 0.4 网 络 的 工作 原理 

7. P2P 与 TCP/IP 有 何 关系 ? P2P 与 操作 系统 是 什么 关系 ? 
8. 简 述 Windows 网 络 编程 的 基本 框架 。 

9. 简 述 WinSock2 与 WinSock1. 1 有 何不 同 

10. 描述 WinSock2 编程 模型 。 

ll. 网 络 编程 与 单机 编程 有 何不 同 ? 

12. 阻塞 , 非 阻塞 和 异步 套 接 字 3 种 工作 模式 有 何不 同 ? 

13. 简 述 网 络 程序 中 主机 名 称 和 主机 地 址 解析 的 含义 。 


WinSock2 API 编 程 | 


在 Windows 平台 上 基于 套 接 字 进行 网 络 编程 有 两 种 模式 可 以 选择 ,一 种 是 基于 
WinSock API, 另 一 种 是 基于 MFC Socket。 这 两 种 模式 有 何 关联 ? MFC Socket 是 基于 
WinSock API 运 用 面向 对 象 技术 重新 封装 和 定义 的 编程 框架 ,编程 起 点 相对 WinSock APT 
高 一 层 ,而 WinSock API 则 是 直接 调用 操作 系统 API, 本 身 也 是 操作 系统 级 别 的 API, 编程 
起 点 相对 较 低 。 

WinSock2 API 的 适用 面 更 广 ,执行 效率 更 高 ,但 编程 工作 量 较 大 ,初学 者 不 易 掌 握 。 
“好 程序 ,系统 造 ”, 读 者 还 是 应 该 从 WinSock API 处 下 功夫 。 


€i Win32 API 窗 体 编程 


在 切入 WinSock2 API 编程 主题 之 前 ,读者 有 必要 熟知 Win32 API 窗 体 编程 。 相 信 通 
过 下 面 的 3 个 小 程序 ,读者 能 够 对 Windows 的 消息 驱动 机 制 和 窗 体 技术 有 所 了 解 , 从 而 即 
JF Windows 窗 体 编程 之 门 ,为 下 一 节 顺 利 进行 WinSock2 API 编程 做 好 准备 。 


2.1.1 弹出 一 个 消息 框 


对 于 C/C++ 程序 员 而 言 ,编写 一 个 Windows 控制 台 应 用 程序 ,最 熟悉 的 程序 入口 莫 过 
于 下 面 这 个 main EAR: 


int main(int argc,char * argv[]) 
如 果 要 开始 写 一 个 32 位 的 Windows 窗 体 程序 ,程序 人 口 就 得 改 成 下 面 的 样子 : 


INT WINAPI wWinMain(HINSTANCE hInst, 
HINSTANCE hPrevInst, 

LPWSTR lpCmdLine, 

INT nShowCnd) 

第 1 个 参数 表示 进程 的 实例 句柄 ; 第 2 个 参数 表示 进程 的 前 一 个 实例 句柄 ,一 般 总 是 
设置 为 NULL; 第 3 个 参数 表示 命令 行 ; 第 4 个 参数 表示 窗 体 的 初始 状态 ,如 最 大 化 、 最 小 
化 等 。 

对 于 main 主 函 数 和 WinMain 或 wWinMain 主 函 数 , 前 者 是 控制 台 程 序 人 口 , 后 者 是 
窗 体 程序 入口。 没有 什么 比 立 即 动手 做 一 个 实例 程序 来 开始 编程 之 旅 更 有 效 的 了 ,下 面 的 
任务 是 编写 一 个 消息 框 程序 ,在 运行 的 时 候 会 在 屏幕 上 弹出 如 图 2. 1 所 示 的 窗 体 。 
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图 2.1 消息 框 


实现 这 个 程序 ,需要 用 到 MessageBox() 函 数 。 当 然 , 要 显示 出 与 图 2. 1 一 模 一 样 的 效 
果 , 函 数 需 要 写成 下 面 这 个 样子 : 
MessageBox( NULL, 
"这 个 消息 框 包含 了 终止 , 重 试 .忽略 按钮 和 一 个 错误 图 标 ”, 


"消息 框 用 法 演示 !"， 
MB ICONERROR | MB ABORTRETRYIGNORE); 


MessageBox() 函 数 的 用 法 如 下 : 
int MessageBox(HWND hWnd, LPCTSTR lpText, LPCTSTR lpCaption, UINT uType) ; 


其 参数 含义 如 下 。 
* hWnd: 窗口 句柄 。 
* lpText: 消息 框 内 显示 的 文本 信息 。 
* lpCaption: 消息 框 的 标题 。 
* uType: 定义 消息 框 的 图 标 类 型 和 按钮 类 型 组 合 。 
消息 框 的 图 标 类 型 包括 以 下 4 种。 
* S MB_ICONQUESTION: 询问 图 标 ,等 待 回答 。 
* À MB ICONWARNING: 警告 图 标 ,引起 注意 。 
* 4 MB_ICONINFORMATION: 信息 提示 图 标 ,反馈 作用 。 
* Q MB_ICONERROR: 错误 图 标 , 提 示 出 现 错误 。 
消息 框 上 的 按钮 组 合 包括 以 下 8 种。 
MB ABORTRETRYIGNORE: Ik ER, ZK. 
MB CANCELTRYCONTINUE: 取消 、 再 试 、 继 续 。 
。 MB_HELP: 帮助 。 
。 MB OK: 确定 。 
* MB_OKCANCEL: 确定 、 取 消 。 
。 MB_RETRYCANCEL: 重 试 .取消 。 
* MB YESNO: 是 、 否 。 
* MB YESNOCANCEL:; 是 、 否 .取消 。 
在 两 个 参数 之 间 加 “|”, 如 MB_ICONQUESTION|MB_OKCANCEL .会 在 消息 框 中 显 
示 询 问 图 标 “ 确 定 ” 按 钮 和 “取消 ”按钮 。 
MessageBox() 函 数 返 回 被 单 击 按钮 的 值 (类 型 为 整数 ) ,最 好 使 用 以 下 宏 定义 标识 符 提 
高 程序 的 可 读 性 和 健壮 性 。 
* IDABORT; 单 击 了 “终止 "按钮 。 
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IDCANCEL: 单 击 了 “取消 ”按钮 。 
IDCONTINUE: 单 击 了 “继续 ”按钮 。 
IDIGNORE: 单 击 了 “忽略 ”按钮 。 

IDNO: 单 击 了 “ 否 ” 按 钮 。 

IDOK: 单 击 了 “确定 ”按钮 。 

IDRETRY: 单 击 了 * 重 试 ?按钮 。 
IDTRYAGAIN: 单 击 了 “再 试 ”按钮 。 

IDYES: 单 击 了 “是 ”按钮 。 

如 果 读 者 对 更 详细 的 介绍 感 兴趣 ,请 参见 MSDN。 
在 桌面 上 弹出 图 2. 1 所 示 的 消息 框 的 程序 代码 如 程序 2. 1 所 示 。 
程序 2.1 弹出 一 个 消息 框 完整 代 码 


# include < windows. h> 

INT WINAPI wWinMain(HINSTANCE hInst, / * Æ% / 
HINSTANCE hPrevInst, 
LPWSTR lpCmdLine, 
INT nShowCnd) 


( 
int nResult - MessageBox(NULL, 
"这 个 消息 框 包含 了 终止 . 重 试 ,忽略 按钮 和 一 个 错误 图 标 "， 
"消息 框 用 法 演示 !"， 
MB ICONERROR|MB ABORTRETRYIGNORE) ; 
switch(nResult) 
{ 
case IDABORT: 
// 单 击 了 “终止 "按钮 
break; 
case IDRETRY: 
// 单 击 了 *“ 重 试 ?按钮 
break; 
case IDIGNORE: 
// 单 击 了 “忽略 "按钮 
break; 
} 
return 0; 


) 

接 下 来 启动 VS2010 ,建立 程序 2. 1 并 进行 测试 。 其 步骤 如 下 : 

(1) 启动 VS2010。 

(2) 选择 “文件 一 新 建 一 项 目 ” 命 令 , 弹 出 如 图 2. 2 所 示 的 对 话 框 , 左 侧 模板 类 型 选择 
Visual C++ 下 的 Win32 ,中间 程序 类 型 选择 “Win32 项 目 ”, 下 方 项 目 名 称 和 解决 方案 名 称 均 
设置 为 *P2-1”, 指 定 保存 位 置 后 单 击 “ 确 定 ” 按 钮 进入 项 目 创建 向 导 。 

在 项 目 创建 向 导 的 第 二 步 选择 程序 类 型 “Windows 应 用 程序 ”, 附 加 选项 选择 “ 空 项 目 ” 
(如 图 2. 3 所 示 ), 单 击 “ 完 成 ”按钮 ,完成 项 目的 初步 创建 。 

读者 可 以 看 到 ,初步 创建 完成 的 新 项 目 解决 方案 如 图 2.4 所 示 , 它 此 时 还 只 是 一 个 空 
项 目 。 
(3) 在 图 2.4 所 示 的 解决 方案 中 单 击 选中 “ 源 文 件 ”, 然 后 在 “ 源 文件 "上 右 击 ,在 快捷 菜 
单 中 选择 “添加 一 新 建 项 ”命令 ,弹出 如 图 2. 5 所 示 的 对 话 框 。 
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XM: Visual CH 


用 于 创建 Win32 应 用 程序 、 控 
制 台 应 用 程序 、DLL 或 其 他 静态 
库 的 项 目 


解决 方案 名 称 ) : P2-1 | 


WR... 
口 为 解决 方案 创建 目录 (D) 
口 汪 加 到 源 代 码 管理 (WD 


图 2.2 在 “新 建 项 目 " 对 话 框 中 设置 项 目 参数 


Win32 应 用 程序 向 导 - P2-1 


应 用 程序 设置 


应 用 程序 类 型 
@ Yindows SARF QD 
O 控制 台 应 用 程序 D) 
onu» 
ondro 


附加 选项 
E 


添加 公共 头 文件 以 用 于 


图 2.3 项 目 创建 向 导 


解决 方案 资源 管 … - ? x 

JIA 

刁 解决 方案 “P2-1 ” 0 - 

ar21 ] 
向 资 源 文件 


图 2.4 新 项 目 
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HEE: RAA Y RE DEED 

E indes Ek Visual CH D. 类 型 : Visual CH 

z 创建 包 言 Ce 源 代 码 的 文件 
*| ch 文件 (. cpp) Visual C++ 
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表态 发 现 文件 (. disco) Visual CH 


头 文件 (.h) Visual CH 
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资源 文件 (.rc) Visual CH 
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图 2.5 新 建 C++ 源 程序 


(4) 如 图 2.5 所 示 ,设置 文件 类 型 为 “C++ 文件 (. cpp)”, 文 件 名 称 为 “P2-1”, 单 击 “ 添 
加 ”按钮 ,创建 P2-1. cpp 文件 。 该 程序 文档 现在 还 是 空 的 ,把 程序 2. 1 的 完整 代码 输入 到 
P2-1. cpp 的 编辑 窗口 中 并 保存 。 

(5) 选择 “调试 一 开始 执行 (不 调试 )” 命 令 , 这 时 会 弹出 一 个 编译 错误 一 一 error C2664; 
“MessageBoxW”, 即 不 能 将 参数 2 从 “const char[51]” 转 换 为 “YLPCWSTR”。 其 解决 方法 是 
选择 项 目 名 称 P2-1, 在 项 目 名 称 P2-1 上 右 击 ,然后 在 快捷 菜单 中 选择 “属性 ”命令 ,弹出 项 
目 属性 对 话 框 ,如 图 2. 6 所 示 。 接 着 把 “配置 属性 ”的 “常规 ”下 的 “字符 集 ” 的 值 * 使 用 
Unicode 字符 集 ” 改 为 “使 用 多 字 节 字符 集 ”, 并 单 击 “ 确 定 ” 按 钮 重新 编译 ,运行 结果 如 图 2. 1 
所 示 。 读 者 可 以 单 击 消息 框 上 的 不 同 按钮 体验 这 个 小 程序 的 妙 处 。 

P2-1 属性 页 ? 
REO: | 活动 (Debus) > 平台 人 ): | 活动 Win32) ` 


输出 目录 $(SolutionDir)$ (Configuration) 
中 间 目 录 $(Configuration)\ 
目标 文件 各 3Projectllane) 
目标 文件 扩展 各 
清除 时 要 到 际 的 扩展 各 + obj;* Lt. resources; tb 
生成 日 志文 件 ix) \ OIStui Pro jectNane). log 
平台 工具 集 
Pu a: S313 
MT š 应 用 程序 (. exe) 
使 用 标准 Windows Æ 
不 使 用 ATL 
z 无 公共 语言 运行 对 支持 
全 程序 优化 无 全 程序 优化 


字符 集 
通知 编译 器 使 用 指证 的 字符 集 ， 大 助 解决 本 地 化 问题 - 


Ca JU ma Ew 
图 2.6 更 改 项 目的 属性 一 一 使 用 多 字 节 字符 集 
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读者 还 记得 第 1 章 中 的 hostent 程序 吗 ? 参照 这 里 的 步骤 ,一 样 可 以 轻松 地 完成 其 创 
建 、 编 译 和 测试 。 


2.1.2 创建 一 个 窗 体 


接 下 来 学 习 如 何 用 Win32 API 创建 一 个 窗 体 程 序 , 这 比 用 一 个 函数 实现 消息 框 复杂 多 
了 ,因为 要 实现 对 窗 体 的 全 面 控制 。 其 主要 步骤 如 下 : 

第 1 步 , 注 册 一 个 窗 体 类 。 aze tnana eOK 

第 2 步 , 创 建 窗 体 。 

第 3 步 ,显示 窗 体 。 

第 4 步 , 创 建 窗 体 回调 函数 。 

程序 运行 结果 如 图 2.7 所 示 。 


1 注册 一 个 窗 体 类 图 2.7 简单 窗 体 程序 的 运行 结果 


窗 体 类 定义 窗 体 的 外 观 属性 ,例如 窗 体 背 景 、 鼠 标 类 型 .菜单 等 。 注 册 一 个 窗 体 类 并 初 
始 化 窗 体 属性 的 代码 一 般 如 下 : 


WNDCLASSEX wClass; 
ZeroMemory(&wClass, sizeof (WNDCLASSEX) ) ; 


wClass.cbClsExtra = NULL; 
wClass. cbSize = sizeof(WNDCLASSEX); 
wClass. cbWndExtra = NULL; 
wClass. hbrBackground = (HBRUSH)COLOR WINDOW; 
wClass. hCursor = LoadCursor(NULL, IDC ARROW); 
wClass. hIcon - NULL; 
wClass. hIconSm = NULL; 
wClass. hInstance - hInst; 
wClass. lpfnWndProc = (WNDPROC)WinProc; 
wClass. lpszClassName = "Window Class"; 
wClass. lpszMenuName = NULL; 
wClass. style = CS HREDRAW|CS VREDRAW; 
这 段 代 码 初学 者 看 起 来 可 能 并 不 轻松 ,下 面 进行 简单 注解 。 
该 程序 首先 用 WNDCLASSEX 类 声明 了 一 个 窗 体 类 一 一 wClass, 并 将 窗 体 的 各 参数 清 
零 , 接 下 来 初始 化 窗 体 的 各 参数 。 窗 体 参 数 的 含义 描述 如 下 。 
* cbClsExtra: 指定 紧 跟 在 窗 体 类 结构 后 的 附加 字 节 数 。 
* cbSize: WNDCLASSEX 的 大 小 ,可 以 用 sizeof(WNDCLASSEX) 来 获取 准确 的 值 。 
* cbWndExtra: 指定 紧 跟 在 窗 体 实例 后 的 附加 字 节 数 。 
hbrBackground: 窗 体 的 背景 色 。 
hCursor: 光标 的 句柄 。 
hIcon: 图 标的 句柄 。 
hIconSm: 窗 体 类 关联 的 小 图 标 。 如 果 该 值 为 NULL, 则 把 hIcon 中 的 图 标 转换 成 
大 小 合适 的 小 图 标 。 
hInstance: 本 模块 的 实例 句柄 。 
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* IpfnWndProc: 窗 体 消息 处 理 函数 (回调 函数 ) 指 针 。 

。 lpszClassName: 指向 类 名 称 的 指针 。 

* lpszMenuName: 指向 菜单 的 指针 。 

° style; 窗 体 类 的 风格 ,可 以 用 “| ”操作 符 把 几 个 风格 组 合 到 一 起 。 

窗 体 类 参数 的 初始 化 细节 还 有 很 多 ,详情 见 MSDN。 这 里 只 列 出 光标 类 型 参数 
hCursor 的 取 值 选择 ,如 表 2. 1 所 示 。 


表 2.1 光标 类 型 参数 hCursor 的 取 值 


光标 类 型 和 取 值 | 光标 类 型 和 取 值 
hg IDC APPSTARTING 中 IDC SIZEALL 
* IDC ARROW + IDC CROSS 
& IDC HAND %2 IDC HELP 
1 IDC IBEAM 9 IDC NO 
^ [DC SIZENESW 1 IDC SIZENS 
» IDC SIZENWSE ^ IDC SIZEWE 
1 IDC UPARROW ^ IDC SIZEWE 


在 完成 WNDCLASSEX 类 实例 wClass 的 初始 化 之 后 ,需要 注册 窗 体 实例 类 wClass. 
代码 如 下 : 


RegisterClassEx( &wClass); 

如 果 窗 体 类 注册 不 成 功 , 上 面 的 函数 返回 0。 如 果 读 者 想 知 道 发 生 了 什么 ,可 以 用 
GetLastError( ) 函 数 捕获 错误 码 。 下 面 的 代码 段 在 窗 体 类 注册 失败 时 捕获 错误 码 并 弹出 一 
个 消息 框 ,增强 了 程序 的 错误 处 理 能 力 : 


if(!RegisterClassEx(&wClass)) 
{ 
int nResult = GetLastError(); // 捕 获 错误 码 
MessageBox( NULL, 
"对 不 起 , 窗 体 类 注册 失败 "， 
" 窗 体 类 错误 "， 
MB ICONERROR); 
) 


2. 创建 窗 体 
如 果 窗 体 类 注册 成 功 , 接 下 来 程序 就 可 以 创建 一 个 窗 体 ,代码 如 下 : 


HWND hWnd = CreateWindowEx(NULL, 
"Window Class", 
"这 是 一 个 简单 的 窗 体 程序 "， 
WS OVERLAPPEDWINDOW, 


200, // 窗 体 的 横 坐 标 
200, // 窗 体 的 纵 坐 标 
640, // 窗 体 的 宽度 
480, // 窗 体 的 高 度 
NULL, 


NULL, 
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hInst, 
NULL); 
如 果 窗 体 创建 不 成 功 ,函数 返回 值 将 为 0, 这 时 可 以 采用 与 前 面 RegisterClassEx 
(&wClass) 不 成 功 时 类 似 的 错误 处 理 代码 。 
3. 显示 窗 体 


如 果 窗 体 创建 成 功 ,可 以 执行 以 下 显示 窗 体 的 代码 : 

ShowWindow(hWnd, nShowCnd) ; 

此 时 运行 程序 并 不 会 显示 出 窗 体 ,为 什么 呢 ? 因为 还 有 极其 重要 的 一 项 工作 有 待 完成 ， 
即 创建 窗 体 回调 函数 。 

4. 创建 窗 体 回调 函数 


(1) 为 程序 添加 一 个 主 循环 ,用 MSG 定义 一 个 消息 一 一 msg, 用 GetMessage() 读 取消 
HIA msg, H] TranslateMessage() 转 换 消 息 放 入 msg. H] DispatchMessage() 向 回调 函数 
发 送 消息 msg. 


MSG msg; 
ZeroMemory( &msg, sizeof (MSG) ) ; 


while(GetMessage(&msg, NULL, 0, 0) ) 
( 
TranslateMessage(&nsg) ; 
DispatchMessage(&msg) ; 
) 


(2) 创建 回调 函数 ,回调 函数 处 理 来 自 窗 体 的 所 有 消息 (由 上 面 的 主 循环 发 出 ), 包 括 窗 
体 大 小 的 改变 .用 户 单 击 了 窗 体 中 的 某 个 菜单 或 按钮 .键盘 对 窗 体 有 输入 等 。 每 当 用 户 触发 
了 窗 体 的 某 一 事件 ,回调 函数 都 会 被 自动 调用 执行 ,根据 收 到 的 消息 转 入 与 之 对 应 的 事件 处 
理 迎 辑 。 回 调 函 数 的 形式 如 下 : 

LRESULT CALLBACK WinProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); 


其 中 ,WinProc 是 窗 体 回调 函数 的 名 称 , 可 以 自由 定义 ,不 过 为 了 便于 理解 可 以 按照 默 
认定 义 。 该 函数 中 的 4 个 参数 与 消息 类 MSG 的 前 4 个 域 是 相同 的 。 

* hWnd: 标识 调用 回调 函数 的 窗 体 句柄 。 
message: 标识 hWnd 窗 体 要 处 理 的 消息 。 
wParam: 一 个 32 位 的 消息 参数 ,其 含义 和 数值 根据 消息 的 不 同 而 不 同 。 

* lParam; 一 个 32 位 的 消息 参数 ,其 值 与 消息 有 关 。 

注意 : 程序 代码 中 通常 不 直接 调用 窗 体 回 调 函 数 ,一 般 由 Windows 系统 自动 调用 ,也 
可 通过 SendMessage 函数 在 程序 代码 中 直接 触发 窗 体 回 调 函 数 的 执行 。 

本 例 的 回调 函数 如 下 : 

LRESULT CALLBACK WinProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) 

{ 


switch(msg) 


) 
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case WM DESTROY: 

t 
PostQuitMessage(0) ; 
return 0; 


) 
break; 


return DefWindowProc( hWnd, msg, wParam, lParam); 


) 


这 个 回调 函数 只 侦 听 WM. DESTROY 消息 并 作出 响应 ,WM_DESTROY 消息 是 用 户 
单 击 了 窗 体 右 上 角 的 国 按 钮 触发 的 。 如 果 现 在 编译 运行 这 个 程序 ,会 在 屏幕 上 显示 一 个 空 


白 的 窗 体 。 


在 后 面 将 学 习 如 何在 这 个 空白 窗 体 上 设计 控件 。 至 此 ,创建 一 个 空白 窗 体 的 工 


作 完 成 ,其 代码 如 程序 2. 2 Bron. 
程序 2.2 创建 一 个 窗 体 完整 代码 


# include < windows.h> 


LRESULT CALLBACK WinProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); 


int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR lpCmdLine, int nShowCnd) 


{ 


WNDCLASSEX wClass; 
ZeroMemory( &wC1ass, sizeof (WNDCLASSEX) ) ; 


wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 
wClass. 


cbClsExtra = NULL; 

cbSize = sizeof(WNDCLASSEX); 
cbWndExtra = NULL; 

hbrBackground - (HBRUSH)COLOR WINDOW; 
hCursor = LoadCursor(NULL, IDC ARROW); 
hIcon = NULL; 

hIconSm = NULL; 

hInstance - hInst; 

lpfnWndProc = (WNDPROC)WinProc; 
lpszClassName = "Window Class"; 
lpszMenuName - NULL; 

style = CS HREDRAW|CS VREDRAW; 


if(!RegisterClassEx(&wClass)) 


( 


int nResult = GetLastError(); 
MessageBox( NULL, 


) 


"对 不 起 , 窗 体 类 注册 失败 "， 
" 窗 体 类 错误 "， 
MB ICONERROR); 


HWND hWnd = CreateWindowEx(NULL, 


"Window Class", 

"这 是 一 个 简单 的 窗 体 程序 "， 
WS OVERLAPPEDWINDOW, 

200, 

200, 
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hInst, 
NULL); 


if(! hWnd) 
{ 
int nResult = GetLastError ( ); 


MessageBox( NULL, 
"创建 窗 体 过 程 发 生 错 误 "， 
"创建 窗 体 失败 "， 

MB ICONERROR); 
) 


ShowWindow( hWnd, nShowCnd) ; 


MSG msg; 
ZeroMemory(&nsg, sizeof (MSG) ) ; 


while(GetMessage(&msg, NULL, 0, 0) ) 
( 
TranslateMessage(&nsg) ; 
DispatchMessage(&nmsg) ; 
) 


return 0; 


) 


LRESULT CALLBACK WinProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) 
{ 

switch(msg) 

{ 


case WM DESTROY: 
{ 
PostQuitMessage(0); 
return 0; 
} 
break; 
} 


return DefWindowProc( hWnd, msg, wParam, lParam) ; 


} 

想必 读者 一 定 急 于 测试 程序 2. 2, 还 记得 前 面 在 VS2010 中 创建 “弹出 一 个 消息 框 ?项 目 
的 步骤 吗 ? 其 步骤 完全 雷同 , 简 述 如 下 : 

CD 启动 VS2010 ,选择 "文件 一 新 建 一 项 目 ” 命 令 ,在 弹出 的 对 话 框 中 设置 项 目 类 型 、 项 
目 名 称 、 解 决 方案 名 称 、 保 存 位置 后 单 击 * 确 定 ?按钮 ,在 项 目 创建 向 导 中 设置 为 “ 空 项 目 ” 后 
单 击 “ 完 成 ”按钮 。 

(2) 在 解决 方案 中 选择 “ 源 文件 ”并 右 击 ,然后 在 快捷 菜单 中 选择 “添加 一 新 建 项 ”命令 ， 
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在 弹出 的 对 话 框 中 设置 文件 类 型 为 “C++ 文件 (. cpp)”, 文 件 名 称 为 “*P2-2”, 单 击 “ 添 加 ” 按 
钮 ,创建 P2-2. cpp 文件 。 

CD 把 程序 2. 2 的 完整 代码 输入 到 P2-2. cpp 的 编辑 窗口 中 并 保存 。 

(4) 选择 “调试 一 开始 执行 (不 调试 )” 命 令 , 仍 会 出 现 编译 错误 ,解决 方法 是 选择 项 目 名 
称 ,在 项 目 名 称 上 右 击 ,选择 “属性 ”命令 ,弹出 项 目 属性 对 话 框 ,把 “配置 属性 ”的 “常规 ”下 的 
“字符 集 ? 的 值 "使 用 Unicode 字符 集 " 改 为 “使 用 多 字 节 字符 集 ”, 单 击 “ 确 定 ” 按 钮 重新 编译 ， 
运行 结果 如 图 2.7 所 示 。 这 个 感觉 是 不 是 很 棒 ? 恰 如 神 笔 马 良 ,寥寥 数 笔 ,一 个 活灵活现 的 
窗 体 就 开始 工作 了 。 


2.1.3 为 窗 体 添加 控件 


窗 体 就 像 一 个 大 容器 ,如 果 一 个 窗 体 中 没有 任何 控件 ,那么 这 个 窗 体 实 在 太 * 穷 "了 , 因 
为 它 不 能 为 用 户 带 来 更 多 的 交互 体验 。 试 想 如 果 为 窗 体 增加 按钮 .文本 框 、 列 表 框 菜 单 等 ， 
又 会 如 何 呢 ? 

现在 为 读者 设 定 一 个 目标 : 在 程序 2.2 的 基础 上 为 窗 体 增加 一 个 “确定 ”按钮 和 一 个 文 
本 框 , 当 单 击 “ 确 定 ” 按 钮 时 弹出 信息 提示 框 , 程 序 运行 
结果 如 图 2.8 所 示 。 


为 达到 上 述 目的 , 先 为 窗 体 添加 按钮 ,再 添加 文本 pa“ 
He, Pe AEK E FU P M ATE IER PEE AY mp 
即 转 到 * 某 处 "去 "做 某 件 事 *。 例 如 打开 一 个 新 窗口 、| = 
发 送 一 封 新 邮件 等 。 文 本 框 用 来 接收 用 户 输入 的 信 
息 。 程 序 设计 步骤 如 下 。 
1. 定义 按钮 标识 符 


定义 按钮 标识 符 是 指定 一 个 唯一 的 整数 值 标识 按钮 对 象 ,一 般 的 做 法 是 在 程序 的 头 部 
用 define 语句 声明 一 个 宏 常 量 , 例 如 : 


# define IDC MAIN BUTTON 101 


LELUIJIAUNI 


图 2.8 为 窗 体 添 加 控件 


2. 添加 WM CREATE 消息 处 理 逻 辑 


在 窗 体 回调 函数 中 增加 对 WM_CREATE 消息 的 处 理 逻辑 , 当 一 个 应 用 程序 创建 窗 体 
时 ,WM_CREATE 消息 会 被 触发 ; 当 希 望 做 一 些 程序 初始 化 工作 时 ,可 以 把 代码 放 到 
WM CREATE 消息 处 理 逻 辑 中 。 例 如 在 后 面 的 网 络 编程 中 ,可 以 把 对 套 接 字 的 初始 化 工 
作 放 到 窗 体 回 调 函 数 的 WM_CREATE 消息 部 分 。 现 在 要 做 的 是 在 switch(msg) 后 面 添 加 
下 面 的 代码 : 

case WM_CREATE: 

pov 


) 
break; 
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3. 


创建 按钮 


创建 按钮 的 过 程 与 创建 窗 体 的 过 程 非常 相似 ,现在 要 做 的 是 把 下 面 的 代码 片段 放 到 
case WM. CREATE 消息 的 两 个 大 括号 中 ,这 样 按钮 会 跟随 窗 体 一 起 被 创建 : 


HWND hWndButton = CreateWindowEx( NULL, 


"BUTTON", 
"HE", 
WS TABSTOP|WS VISIBLE|WS CHILD|BS DEFPUSHBUTTON, 
50, // 按 钮 在 窗 体 中 的 横 坐 标 
150, // 按 钮 在 窗 体 中 的 纵 坐 标 
100, // 按 钮 的 宽度 
24, // 按 钮 的 高 度 
hWnd, 
(HMENU)IDC MAIN BUTTON, 
GetModuleHandle(NULL), 
NULL); 


观察 上 面 的 代码 片段 ,不 知 细心 的 读者 发 现 了 没有 ,创建 按钮 与 创建 窗 体 使 用 了 相同 的 
函数 原型 ,所 以 下 面 对 各 参数 含义 的 解释 均 用 * 窗 体 " 代 蔡 按钮 ,在 后 面 创建 文本 框 控件 时 也 
是 如 此 ,因为 Windows 把 它 的 可 视 化 控件 视 作 一 个 特殊 的 小 窗 体 。 

各 参数 的 含义 如 下 : 


第 1 个 参数 表示 窗 体 (按钮 ) 的 扩展 风格 ,设置 为 NULL。 

第 2 个 参数 表示 窗 体 类 型 ,设置 为 BUTTON 。 

第 3 个 参数 是 指向 窗 体 (按钮 ) 标 题 的 指针 ,此 处 设置 为 “确定 ”表示 按钮 上 显示 的 
文本 。 

第 4 个 参数 表示 窗 体 (按钮 7) 风格。 

第 5 个 参数 设置 窗 体 (按钮 ) 的 水 平 位 置 。 

第 6 个 参数 设置 窗 体 (按钮 ) 的 垂直 位 置 。 

第 7 个 参数 设置 窗 体 (按钮 ) 的 宽度 。 

第 8 个 参数 设置 窗 体 (按钮 ) 的 高 度 。 

第 9 个 参数 设置 父 窗 体 的 句柄 。 

第 10 个 参数 设置 按钮 的 标识 符 ,前面 已 经 用 define 定义 。 

第 11 个 和 第 12 个 参数 对 于 按钮 不 是 必需 的 ,设置 为 NULL. 


此 时 运行 程序 ,可 以 看 到 一 个 带 有 “确定 ”按钮 的 窗 体 ,美中不足 的 是 ,如 果 单 击 “ 确 定 ” 
按钮 ,会 发 现 它 并 不 理会 用 户 的 单 击 动作 。 
不 要 急 , 接 下 来 在 文本 框 控件 完成 后 ,再 来 关注 按钮 的 单 击 事件 。 


4. 


创建 文本 框 


文本 框 的 创建 与 按钮 的 创建 如 出 一 略 ,首先 也 是 在 程序 头 部 用 define 定义 文本 框 标识 
符 , 并 为 它 指定 一 个 唯一 的 整数 值 ,接着 用 创建 窗 体 函 数 创建 文本 框 。 其 代码 如 下 : 


hEdit = CreateWindowEx(WS EX CLIENTEDGE, 


"EDIT", 
m 
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WS CHILD|WS VISIBLE|ES MULTILINE|ES AUTOVSCROLL|ES AUTOHSCROLL, 


hWnd, 
(HMENU)IDC MAIN EDIT, 
GetModuleHandle(NULL), 
NULL); 
其 参数 设置 与 按钮 稍 有 不 同 ,第 1 个 参数 窗 体 风 格 不 为 NULL, 而 是 为 编辑 框 四 周 添 
加 一 个 好 看 的 立体 边框 ; 第 2 个 参数 被 改 成 了 EDIT。BUTTON #l EDIT 都 是 Win32 API 
内 置 的 预定 义 类 型 。 如 果 现 在 运行 程序 , 窗 体 上 会 出 现 按钮 和 文本 框 两 个 控件 。 


5. 初始 化 文本 框 中 的 内 容 


如 果 想 一 开始 就 在 编辑 框 中 显示 点 什么 ,可 以 用 SendMessage() 函 数 产生 一 条 窗 体 消 
息 ,代码 如 下 : 
SendMessage(hEdit，WM_SETTEXT，NULL，(LPARAM) "用户 在 这 里 输入 文本 并 编辑 .…"); 


6. 让 按钮 工作 起 来 


读者 还 记得 窗 体 回调 函数 吗 ? 在 此 需要 为 它 添加 能 处 理 WM_COMMAND 消息 的 代 
18538 4 , 3 FE ,每 次 用 户 单 击 按钮 ,都 会 触发 WM. COMMAND 消息 ,这 个 消息 的 类 型 为 
LOWORD, 编 程 者 要 做 的 就 是 在 回调 函数 中 增加 以 下 代码 片段 : 

case WM_COMMAND: 

switch( LOWORD( wParam) ) 


{ 
case IDC MAIN BUTTON: 


í 
// 此 处 添加 单 击 按钮 后 的 处 理 逻 辑 
) 


break; 
) 
break; 


"Ag EL BET FI. IDC MAIN BUTTON 后 面 的 代码 将 被 执行 。 这 个 标识 符 在 文件 头 
部 定义 , 它 的 值 为 101, 这 是 一 种 很 好 的 编程 风格 ,因为 程序 员 记 住 标识 符 要 比 记 住 101 容 
易 多 了 。 
如 果 希 望 用 户 单 击 按钮 后 弹出 一 个 消息 框 ,消息 框 中 显示 文本 框 中 的 内 容 , 那 么 只 要 把 
下 面 这 段 代码 插入 到 case IDC_MAIN_BUTTON 后 面 即 可 : 
char buffer[256]; 
SendMessage(hEdit, 
WM GETTEXT, 
sizeof(buffer)/sizeof(buffer[0]), 
reinterpret cast < LPARAM»(buffer)); 


MessageBox(NULL, 
buffer, 
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"ARER", 
MB ICONINFORMATION); 
现在 这 个 程序 已 经 是 一 个 有 意义 的 窗 体 小 程序 
了 ,用 户 单 击 “ 确 定 ” 按 钮 会 弹出 消息 框 ,并 在 消息 框 
中 显示 文本 框 中 的 内 容 , 如 图 2. 8 所 示 。 然 后 改变 文 
本 框 中 的 内 容 , 再 次 单 击 该 按钮 ,会 重新 弹出 消息 框 ， 
如 图 2.9 所 示 ,很 有 趣 。 
为 窗 体 添加 控件 程序 的 代码 如 程序 2. 3 所 示 。 
程序 2.3 为 窗 体 添加 控件 完整 代码 


# include < windows.h> 


I 


BEREH 


图 2.9 改变 文本 框 中 内 容 后 的 测试 结果 


# define IDC MAIN BUTTON — 101 // 按 钮 标识 符 
# define IDC MAIN EDIT 102 // 文 本 框 标识 符 
HWND hEdit; 


LRESULT CALLBACK WinProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); 


int WINAPI WinMain(HINSTANCE hInst,HINSTANCE hPrevInst, LPSTR lpCmdLine, int nShowCnd) 


( 
WNDCLASSEX wClass; 
ZeroMemory(&wClass, sizeof (WNDCLASSEX) ) ; 
wClass.cbClsExtra = NULL; 
wClass.cbSize = sizeof (WNDCLASSEX); 
wClass.cbWndExtra = NULL; 
wClass. hbrBackground = (HBRUSH)COLOR WINDOW; 
wClass.hCursor = LoadCursor(NULL, IDC ARROW); 
wClass. hIcon = NULL; 
wClass. hIconSm = NULL; 
wClass. hInstance - hInst; 
wClass.lpfnWndProc = (WNDPROC)WinProc; 
wClass.lpszClassName = "Window Class"; 
wClass. lpszMenuName = NULL; 
wClass.style- CS HREDRAW|CS VREDRAW; 


if(!RegisterClassEx(&wClass)) 
t 
int nResult = GetlastError(); 
MessageBox( NULL, 
"注册 窗 体 类 失败 \r\n"， 
" 窗 体 类 失败 "， 
MB_ICONERROR) ; 
} 


HWND hWnd = CreateWindowEx(NULL, 
"Window Class", 
"为 窗 体 添加 控件 ……"， 
WS_OVERLAPPEDWINDOW, 
200, 
200, 
640, 
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hInst, 
NULL); 


if(!hWnd) 


{ 
int nResult = GetLastError(); 


MessageBox( NULL, 
"创建 窗 体 发 生 错误 \r\n", 
"创建 窗 体 失 败 "， 
MB ICONERROR) ; 


ShowWindow( hWnd, nShowCnd) ; 


MSG nsg; 
ZeroMemory(&nsg, sizeof(MSG)) ; 


while(GetMessage(&msg, NULL, 0, 0) ) 
t 
TranslateMessage(&msg) ; 
DispatchMessage(&msg) ; 


return 0; 


) 


LRESULT CALLBACK WinProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) 
{ 
switch(msg) 
{ 
case WM CREATE: 
{ 

// 创 建 一 个 文本 框 

hEdit = CreateWindowEx(WS_EX_CLIENTEDGE, 
"EDIT", 
"", // 也 可 以 在 此 处 设置 初始 文本 
WS_CHILD|WS_VISIBLE| 
ES MULTILINE|ES AUTOVSCROLL|ES AUTOHSCROLL, 
30, 
30, 
200, 
100, 
hWnd, 
(HMENU)IDC MAIN EDIT, 
GetModuleHandle(NULL), 
NULL); 

HGDIOBJ hfDefault = GetStockObject(DEFAULT GUI FONT); // 设 置 字体 

SendMessage(hEdit, 
WM SETFONT, 
(WPARAM)hfDefault, 
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MAKELPARAM(FALSE, 0) ) ; 
SendMessage( hEdit, 
WM_SETTEXT, 
NULL, 
(LPARAM) "用 户 在 这 里 输入 文本 并 编辑 .…") 7 


// 创 建 一 个 按钮 

HWND hWndButton = CreateWindowEx( NULL, 
"BUTTON", 
"确定 "， 
WS TABSTOP|WS VISIBLE| 
WS CHILD|BS DEFPUSHBUTTON, 
50, 
150, 
100, 
24, 
hWnd, 
(HMENU) IDC_MAIN_BUTTON, 
GetModuleHandle( NULL), 
NULL); 

SendMessage( hWndButton, 
WM SETFONT, 
(WPARAM) h£Default, 
MAKELPARAM( FALSE, 0) ) ; 

) 
break; 


case WM_COMMAND: 
switch( LOWORD( wParam) ) 
{ 
case IDC MAIN BUTTON: 
{ 
char buffer[256]; 
SendMessage( hEdit, 
WM GETTEXT, 
sizeof(buffer)/sizeof(buffer[0]), 
reinterpret cast < LPARAM»(buffer)); 


MessageBox(NULL, 
buffer, 
"信息 提示 ”， 
MB ICONINFORMATION); 
} 
break; 
} 
break; 


case WM DESTROY: 

{ 
PostQuitMessage(0) ; 
return 0; 

} 

break; 
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return DefWindowProc(hiind, msg, wParam, lParam) ; 
) 


程序 2. 3 的 创建 .编辑 、 调 试 步 又 与 前 面 的 程序 2. 1、 程 序 2. 2 完全 相同 ,此 处 不 再 
重复 。 


€.2 WinSock2 API 编程 框架 


如 果 读 者 对 2. 1 节 的 Win32 API 窗 体 编程 已 经 驾轻就熟 ,那么 接 下 来 是 否 可 以 立即 开 
始 Winsock2 API 编程 了 呢 ? 是 的 ,但 最 好 还 是 一 步 步 来 。 本 节 先 从 熟悉 WinSock2 API 的 
程序 结构 和 库 函 数 开始 介绍 。 


2.2.1 WinSock2 API 程序 结构 


工 欲 善 其 事 , 必 先 利 其 器 。 由 于 本 书 使 用 VS2010 作为 WinSock2 的 开发 环境 ,下 面 首 
先 介绍 在 VS2010 中 创建 WinSock 应 用 程序 的 基本 步骤 ,给 出 WinSock2 API 程序 的 基本 
结构 ,步骤 如 下 : 

(1) 新 建 一 个 Win32 API 空 项 目 。 

(2) 添加 一 个 空 的 C++ 源 文件 到 项 目 中 。 

(3) 编写 include 必需 的 头 文件 。 

(4) 链接 WinSock 库 文件 ws2_32. lib。 

(5) 开始 WinSock 应 用 程序 编程 。 

WinSock2 API 程序 的 基本 结构 如 下 : 

# include < winsock2. h> //include 必需 的 头 文件 


# include < ws2tcpip.h> 
# include < stdio. h> 


# pragma comment(lib, "ws2 32.1ib") // 链 接 WinSock 库 文件 ws2 32.1ib 


int main() { 
// 开 始 WinSock 应 用 程序 编程 
return 0; 


) 

WinSock2 API 的 编程 框架 分 为 3 个 层次 ,如 图 2. 10 所 示 。 其 中 ,最 上 层 为 用 户 程序 
层 ; 中 间 层 为 WinSock2 API, 以 ws2 32. dll 的 形式 提供 ; 最 下 层 为 WinSock2 SPI, 调 用 操 
作 系 统 内 核实 现 中 间 层 的 API 

图 2. 10 体现 了 WinSock2 API 的 编程 思想 ,编程 者 通过 调用 WinSock2 API 在 操作 系 
统 层面 上 实现 网 络 程序 开发 ,这 也 正 是 WinSock2 API 程序 中 需要 包含 winsock2. h 这 个 头 
文件 并 且 要 链接 到 库 文件 ws2_32. lib 的 原因 。 在 后 面 还 会 学 习 每 次 使 用 WinSock2 EF 
之 前 ,需要 用 WSAStartup() 这 个 函数 加 载 初始 化 WinSock2 服务 ; 在 程序 结束 之 前 ,需要 
用 WSACleanup() 这 个 函数 关闭 WinSock2 服务 ,释放 资源 。 
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WinSock2 API 程 序 1 WinSock2 API 程 序 N 


2.252 


熟悉 、 了 解 和 掌握 WinSock2 API 提供 的 库 函 数 是 编程 之 前 需要 做 的 功课 ,下 面 按 昭 


WinSock2 的 发 


表 2.2 列 出 的 是 BSD 套 接 字库 函数 。 众 所 周知 , WinSock 继承 自 Berkeley Sockets， 
K 2.2 列 出 的 库 函 数 均 包括 在 WinSockl. 1 规范 里 ,它们 也 是 WinSock2 的 库 函 数 ,这 保证 


Windows Sockets 2 | | 
API 


传输 服务 函数 名 称 解析 服务 函数 


ws2_32.dll 


Windows Sockets 2 ————H:( 
Transport SPI 
Transport | | Transport | | Name Space| | Name Space 
Service Service Service Service 
Provider Provider Provider Provider 
操作 系统 
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WinSock2 API 库 函 数 


Windows Sockets 2 
Name Space SPI 


展 历程 将 这 些 函 数 进行 归纳 ,如 表 2. 2 一 表 2.4 所 示 。 


了 UNIX 系统 上 的 套 接 字 程序 可 以 轻松 地 移植 到 Windows 平台 


f£ WinSockl. 1 


, 表 2. 2 中 的 库 函 数 可 以 在 WinSock2 中 直接 使 用 。 


`, WinSock2. 2 完全 兼 


表 2.2  WinSock2 继承 的 库 函数 ( 源 自 BSD Sockets 和 WinSock1. 1) 


函 数 * A 
当 有 新 连接 到 达 时 ,立即 创建 一 个 新 的 套 接 字 与 新 连接 通信 , 原 有 的 套 接 字 继续 处 于 
accept() 
侦 听 状态 
bind() 将 一 本 地 地 址 (主机 地 址 /端口 ) 与 一 套 接 字 捆 绑 
closesocket()” | 关闭 套 接 字 ,释放 套 接 字 资 源 
connect() ° 用 于 创建 与 指定 外 部 地 址 的 连接 
getpeername() | 获取 与 指定 套 接 字 相连 的 端 地 址 
getsockname() | 获取 指定 套 接 字 的 本 地 地 址 
getsockopt() 获取 指定 套 接 字 的 选项 参数 值 
htonlO^ 将 无 符号 长 整 型 数 从 主机 字 节 顺序 转换 成 网 络 字 节 顺序 
htonsO* 将 无 符号 短 整 型 数 从 主机 字 节 顺序 转换 成 网 络 字 节 顺 序 
inet addrO 7 将 一 个 点 分 十 进 制 的 IP 地 址 字符 串 转 换 成 一 个 长 整 型 数 


inet_ntoa()™ 


将 网 络 地 址 转换 成 以 “. ”分 隔 的 字符 串 格式 ,如 “a. b. c. d" 


ioctlsocket() 


控制 套 接 字 的 工作 模式 


listen() 


在 指定 套 接 字 上 侦 听 进入 的 新 连接 


ntohlO ^ 


将 无 符号 长 整 型 数 从 网 络 字 节 顺序 转换 为 主机 字 节 顺序 


ntohsO ^ 


将 无 符号 短 整 型 数 从 网 络 字 节 顺序 转换 为 主机 字 节 顺序 
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续 表 
[E E 作 用 
recvO * 从 一 个 套 接 字 接 收 ( 读 取 ) 数 据 
recvfromO * 从 一 个 套 接 字 接 收 ( 读 取 ) 数 据 
selectO * 检测 套 接 字 的 1/O 状态 
sendO * 向 一 个 套 接 字 发 送 数据 
sendtoO ` 向 一 个 套 接 字 发 送 数 据 
setsockopt() 设置 指定 套 接 字 的 选项 参数 值 
shutdown() 关闭 套 接 字 的 数据 接收 或 发 送 功能 
socket() 创建 套 接 字 


iE: (1) 带 * 的 函数 表示 套 接 字 在 阻塞 模式 下 工作 时 可 能 发 生 阻 塞 。 
(2) 带 吕 的 函数 是 为 了 与 WinSockl. 1 兼容 保留 的 ,只 适用 于 AF_INET 地 址 族 。 


WinSock2 对 Berkeley 套 接 字 规 范 和 WinSock1. 1 规范 进行 了 较 大 扩展 ,这 些 扩展 API 
除了 WSAStartupO fll WSACleanup() 在 WinSock2 编程 中 必须 使 用 外 , 表 2. 3 给 出 的 其 他 


库 函 数 都 不 是 必需 的 。 


表 2.3  WinSock2 新 增 的 库 函 数 ( 源 自 对 Berkeley 和 WinSockl. 1 的 扩展 ) 


ff A 


WSAAcceptO * 


accept() 函 数 的 扩展 版 , 当 有 新 连接 到 达 时 ,立即 创建 一 个 新 的 套 
接 字 与 新 连接 通信 , 原 有 的 套 接 字 继 续 处 于 侦 听 状态 


WSAAsyncGetHostByAddr()™** 


WSAAsyncGetHostByNameO *'* 


WSAAsyncGetProtoByName() ^'* 


WSAAsyncGetProtoByNumberO ^ ** 


WSAAsyncGetServByNameO ^ '* 


WSAAsyncGetServByPort( ) ° ` 


这 是 一 组 针对 Berkeley 的 getXbyY() 函 数 的 异步 版 本 扩展 。 例 如 ， 
WSAAsyncGetHostByName() 函 数 是 Berkeley 的 gethostbyname() 的 异 
步 版 本 ,用 来 获取 主机 名 称 和 地 址 信息 , WSAAsyncGetHostByAddr() 
函数 是 Berkeley 的 gethostbyaddr() 的 异步 版 本 ,用 来 获取 主机 名 和 地 
址 信息 


WSAAsyncSelectO ** 


sejlect() 函 数 的 异步 版 本 


WSACancelAsyncRequestO ^ ** 


取消 一 次 异步 操作 


WSACleanup() 停止 WinSock2 DLL 服务 ,释放 资源 

WSACloseEvent() 关闭 一 个 事件 对 象 句柄 

A connect() 函 数 的 扩展 版 本 ,创建 一 个 与 远 端的 连接 ,能 根据 流 描 述 
确定 所 需 的 服务 质量 

WSACreateEvent() 创建 事件 对 象 

WSADuplicateSocket() 为 一 个 共享 套 接 字 创 建 一 个 新 的 套 接 字 

WSAEnumNetworkEvents() 检测 所 指定 的 套 接 字 上 发 生 的 网 络 事件 

WSAEnumProtocols() 获取 传送 协议 的 相关 信息 

WSAEventSelect() 确定 与 所 提供 的 FD_XXX 网 络 事件 (如 FD READ,FD CONNECT, 
FD_OOB) 集 合 相关 的 一 个 事件 对 象 

WSAGetLastErrorO ** 该 函数 返回 上 次 发 生 的 网 络 错误 信息 

WSAGetOverlappedResult() 返回 指定 套 接 字 的 上 一 个 重 人 操作 的 结果 

WSAGetQoSByNameO 根据 一 个 模板 初始 化 QoS 

WSAHtonlO) htonlO 函数 的 扩展 版 本 

WSAHtonsO htonsO 函数 的 扩展 版 本 
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续 表 
8 E 作 用 

WSAloctlO * 控制 套 接 字 的 模式 ,ioctl() 函 数 的 扩展 版 本 

WSAJoinLeafO ` 将 一 个 叶 节点 加 入 一 个 多 点 会 晤 ,交换 连接 数据 

——À ntohl() 函数 的 扩展 版 本 ,将 一 个 以 网 络 字 节 顺序 表示 的 无 符号 长 
整 型 数 转换 为 主机 字 节 顺序 

NSANGESO ntohs() 函 数 的 扩展 版 本 ,将 一 个 以 网 络 字 节 顺 序 表示 的 无 符号 短 
整 型 数 转换 为 主机 字 节 顺序 

WSAProviderConfigChange() 接收 安装 服务 或 印 载 服务 的 通知 消息 


WSARecvO ` 


recv O 函数 的 扩展 版 本 


WSARecvFromO * 


recvfromO PR #k (09 JE IR K 


WSAResetEvent() 重 置 事件 对 象 
WSASendO ` send() 函 数 的 扩展 版 本 
WSASendToO * sendtoO 函数 的 扩展 版 本 
WSASetEvent() 设置 事件 对 象 
WSASetLastErrorO ** 设置 最 近 的 错误 信息 


WSASocket() 


socket() 函数 的 扩展 版 本 ,使 用 WSAPROTOCOL_INFO 结构 作为 
输入 参数 ,并 创建 重合 Socket 


WSAStartupO '* 


初始 化 WinSock DLL 


WSAWaitForMultipleEventsO * 


在 多 个 事件 对 象 上 阻塞 


注 : (1) 带 * 的 函数 表示 套 接 字 在 阻塞 模式 下 工作 时 可 能 发 生 阻塞 。 
(2) 带 ” 的 函数 只 适用 于 AF_INET 地 址 族 。 
C3) 带 ** 的 表示 库 函 数 原本 在 WinSockl. 1 中 定义 ,在 WinSock2. 2 中 又 重新 进行 了 定义 。 


表 2.4 给 出 的 是 WinSock2 的 新 增 库 函数 ,用 于 名 称 注册 解析 ,它们 是 WinSock1.1 中 


所 没有 的 。 
表 2.4 WinSock2 的 新 增 库 函数 (名 称 注册 解析 函数 ) 
Lj 数 ft A 
WSAAddressToStringO 将 地 址 转换 成 可 读 字符 串 
WSAEnumNameSpaceProviders() 获取 名 称 注 册 和 解析 服务 提供 者 列表 
WSAGetServiceClassInfo 获取 指定 服务 类 的 相关 信息 
WSAGetServiceClassNameByClassId() | 返回 特定 类 型 的 服务 名 称 


WSAInstallServiceClass() 


创建 一 个 新 的 服务 类 


WSALookupServiceBegin() 


初始 化 客户 查询 ， 此 查询 的 限制 信息 包含 在 结构 
WSAQUERYSET 中 


WSALookupServiceEnd() 


此 函数 在 WSALookupServiceBegin() 和 WSALookupServiceNext() 
调用 之 后 释放 用 于 查询 的 句柄 


WSALookupServiceNext() 


此 函数 在 WSALookupServiceBegin() 函数 调用 获得 一 个 句柄 
之 后 调用 , 用 来 检索 请 求 服务 信息 


WSARemoveServiceClass() 


此 函数 用 来 永久 地 注销 一 个 服务 类 


WSASetServiceO 


此 函数 用 来 在 一 个 或 多 个 名 字 空 间 中 注册 或 注销 一 个 服务 
实例 


WSAStringToAddress() 


此 函数 将 数字 字符 串 转换 为 一 个 套 接 字 地 址 结构 SOCKADDR 
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表 2.2 一 表 2. 4 展示 的 库 函 数 是 WinSock2 API 于 1997 年 发 布 的 2. 2 版 本 的 全 貌 。 
WinSock2 函数 名 称 的 前 3 个 字母 均 为 WSA (Windows Sockets Asynchronous, Windows 
异步 套 接 字 ) ,用 于 标识 是 WinSock2 新 增 函 数 , 从 而 便于 与 WinSockl. 1 函数 和 Berkeley 
Sockets 函数 相 区 别 。WinSock2 扩充 的 功能 调用 都 冠 以 WSA 前 级 ,表明 它们 都 允许 异步 
的 L/O 操作 ,并 且 采 用 了 符合 Windows 消息 机 制 的 网 络 事件 异步 选择 机 制 。 使 用 这 样 的 接 
口 设计 有 利于 开发 者 更 好 地 利用 Windows 的 消息 驱动 特性 设计 出 高 性 能 的 网 络 程序 。 


2.2.3 WinSock2 的 新 发 展 


尽管 WinSock2 API 的 版 本 停留 在 1997 年 的 2.2 版 ,但 随 着 Windows 操作 系统 的 每 
一 次 升级 , WinSock2 API 都 有 所 变化 和 增强 ,在 此 限于 篇 幅 仅 列 出 部 分 内 容 , 详 细 内 容 请 
参见 MSDN., 


1. 针对 Windows 8 和 Windows Server 2012 的 扩展 


RIO API 是 WinSock 针对 Windows 8 和 Windows Server 2012 新 扩展 的 功能 ,目的 是 
减少 网 络 延 迟 .提高 消息 速率 和 改进 应 用 程序 响应 时 间 的 可 预测 性 。RIO API 扩展 允许 处 
理 大 量 消息 的 应 用 程序 获得 更 高 的 每 秒 L/O 操作 数 (IOPS) ,同时 减少 抖动 和 延迟 ,适合 设 
计 金 融 服务 交易 和 高 速 市 场 数据 收 /发 的 应 用 程序 。RIO API 扩展 支持 传输 控制 协议 
TCP ,用户 数 据 报 协议 UDP 和 多 播 技术 ,并 且 支 持 IPv4 和 IPv6 。 

CD 新 增 库 函 数 : 

RIOCloseCompletionQueue 


RIOCreateCompletionQueue 
RIOCreateRequestQueue 
RIODequeueCompletion 
RIODeregisterBuffer 

RIONotify 

RIOReceive 

RIOReceiveEx 

RIORegisterBuffer 
RIOResizeCompletionQueue 
RIOResizeRequestQueue 

RIOSend 

RIOSendEx 

(2) 新 增 数 据 结构 、 枚 举 类 型 定义 等 : 

* RIO CQ 

* RIO RQ 

RIO BUFFERID 

RIO BUF 

RIO NOTIFICATION COMPLETION 
RIO NOTIFICATION COMPLETION TYPE 
RIORESULT 
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G) 其 他 一 些 大 量 扩展 见 MSDN., 
2. 针对 Windows 7 和 Windows Server 2008 R2 的 扩展 


OD 下 述 函 数 得 到 增强 : 

* getaddrinfo 

* GetAddrInfoEx 

* GetAddrInfoW 

(2) 新 增 套 接 字 选项 : 

* IP ORIGINAL ARRIVAL IF 

* IP ORIGINAL ARRIVAL IF for IPv6 


3. 针对 Windows Vista 系统 的 扩展 


(1) 新 增 库 函数 : 

* FreeAddrInfoEx 

* GetAddrInfoEx 

* [netNtop 

* [netPton 

* SetAddrInfoEx 

* WSAConnectByList 

* WSAConnectByName 

* WSADeleteSocketPeerTargetName 
* WSAEnumNameSpaceProvidersEx 
* WSAImpersonateSocketPeer 

* WSAPoll 

* WSAQuerySocketSecurity 

* WSARevertImpersonation 

* WSASendMsg 

* WSASetSocketPeerTargetName 

* WSASetSocketSecurity 

(2) 新 增 数据 结构 和 枚 举 类 型 : 

* addrinfoex 

* BLOB 

* GROUP FILTER 

* GROUP REQ 

* GROUP SOURCE REQ 

* MULTICAST MODE TYPE 

* NAPI DOMAIN DESCRIPTION BLOB 
* NAPI PROVIDER INSTALLATION BLOB 
* NAPI PROVIDER LEVEL 

* NAPI PROVIDER TYPE 


* SOCKET PEER TARGET NAME 

* SOCKET SECURITY PROTOCOL 

* SOCKET SECURITY QUERY INFO 
* SOCKET SECURITY QUERY TEMPLATE 
* SOCKET SECURITY SETTINGS 

* SOCKET SECURITY SETTINGS IPSEC 
* SOCKET USAGE TYPE 

* WSAQUERYSET2 

(3) 新 增 Windows Sockets SPI JE PRA: 

* NSPv2Cleanup 

e NSPv2ClientSessionRundown 

* NSPv2LookupServiceBegin 

* NSPv2LookupServiceEnd 

* NSPv2LookupServiceNextEx 

e NSPv2SetServiceEx 

* NSPv2Startup 

* WSAAdvertiseProvider 

* WSAProviderCompleteAsyncCall 

* WSAUnadvertiseProvider 

* WSCEnumNameSpaceProvidersEx32 

* WSCGetApplicationCategory 

* WSCGetProviderInfo 

* WSCInstallNameSpaceEx 

* WSCInstallNameSpaceEx32 

* WSCSetApplicationCategory 

* WSCSetProviderInfo 

* WSCSetProviderInfo32 

(4) 新 增 Windows Sockets SPI 数据 结 
NSPV2_ROUTINE 


4. 针对 Windows Server 2003 的 扩展 


CD 新 增 库 函 数 : 

* ConnectEx 

* DisconnectEx 

e freeaddrinfo 

* gai strerror 

* getaddrinfo 

* getnameinfo 

* TransmitPackets 
e WSANSPloctl 
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* WSARecvMsg 

(2) 新 增 数据 结构 : 

addrinfo 

in_pktinfo 

SOCKADDR_STORAGE 
TRANSMIT_PACKETS ELEMENT 
* WSAMSG 


@3 阻塞 / 非 阻塞 模式 套 接 字 编 程 


网 络 程序 通过 Socket 与 外 界 进行 数据 交换 。 在 发 送 端 ,Socket 如 何 把 数据 交 给 传输 
层 , 编 程 者 是 不 关心 的 ; 在 接收 端 ,Socket 如 何 从 传输 层 获取 数据 ,编程 者 也 是 不 关心 的 。 编 
程 者 只 关心 Socket 的 用 法 。 本 节 重 点 介绍 WinSock 阻塞 . 非 阻塞 模式 下 的 Socket 编程 方法 。 


2.3.1 阻塞 模式 套 接 字 客 户 机 编程 


为 了 让 初学 者 的 注意 力 集中 于 理解 套 接 字 的 工作 过 程 , 将 程序 2. 4 一 程序 2. 8 都 设计 成 
控制 台 类 应 用 程序 ,需要 包含 的 头 文件 是 WinSock2. hiostream, 链 接 的 库 文件 为 ws2_32. lib. 
下 面 从 设计 一 个 阻塞 模式 客户 机 程序 开始 学 习 , 该 程序 完成 的 工作 很 简单 , 即 连接 到 指定 服 
务 器 .接收 并 显示 服务 器 发 送 回来 的 消息 。 该 程序 的 设计 步骤 如 下 。 

1. 启动 并 初始 化 WinSock2 服务 


WSADATA WsaDat; 

WSAStartup(MAKEWORD(2, 2) , &WsaDat) ; 

WSAStartup 是 Windows 异步 套 接 字 服 务 的 启动 命令 。 在 应 用 程序 调用 其 他 
WinSock API 函数 之 前 ,必须 调用 WSAStartup 函数 完成 对 WinSock 服务 的 初始 化 。 

第 1 个 参数 指明 程序 请 求 使 用 的 Socket 版 本 ,其 中 ,高 位 字 节 指明 副 版 本 ,低位 字 节 指 
明 主 版 本 ; 操作 系统 利用 第 2 个 参数 返回 请 求 的 Socket 的 版 本 信息 。 当 应 用 程序 调用 
WSAStartup 函数 时 ,操作 系统 根据 请 求 的 Socket 版 本 来 搜索 相应 的 Socket 库 , 然 后 将 找到 
的 Socket 库 绑 定 到 该 应 用 程序 中 。 之 后 应 用 程序 才 可 以 随时 调用 所 请 求 的 Socket HE R% 

上 面 两 行 代码 设置 WinSock 版 本 号 为 2. 2 并 执行 初始 化 工作 ,如 果 执 行 成 功 ， 
WSAStartup 函数 的 返回 值 为 0。 


2. 创建 Socket 


SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
用 socket 函数 创建 一 个 Socket 套 接 字 对 象 。socket 函数 原型 如 下 : 


SOCKET WSAAPI socket( 
.In  intaf, 
.In int type, 
.In int protocol 


); 
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第 1 个 参数 对 于 IPv4 地 址 来 说 总 是 设置 为 AF_INET, 也 可 以 根据 使 用 的 底层 协议 设 
TUM AF UNSPEC, AF. INET, AF. IPX, IPX/SPX, AF APPLETALK, AF. NETBIOS, 
AF INET6,AF IRDA,AF BTH, 

第 2 个 .第 3 个 参数 在 首 参 数 为 AF_INET 时 ,总 是 设置 为 SOCK. STREAM 和 
IPPROTO_TCP。 第 2 个 参数 为 套 接 字 接 口 类 型 , Windows Sockets 2 支持 的 类 型 除了 
SOCK STREAM 以 外 ,还 有 SOCK_DGRAM, SOCK_RAW, SOCK_RDM 和 SOCK _ 
SEQPACKET。 但 是 对 于 Windows Sockets 1. 1, socket 函数 只 支持 SOCK_DGRAM 和 
SOCK STREAM, 

第 3 个 参数 表示 套 接 字 采 用 的 底层 协议 类 型 。 若 设置 为 0, 表 示 创 建 套 接 字 时 不 指定 
底层 协议 ,通信 时 底层 协议 由 套 接 字 底 层 服 务 自动 选择 。 当 首 参数 为 AF_INET 或 AF_ 
INET6 时 ,第 2 个 参数 套 接 字 类 型 为 SOCK_RAW, 第 3 个 参数 协议 类 型 可 以 选择 为 
IPPROTO _ ICMP, IPPROTO _ IGMP, BTHPROTO _ RFCOMM, IPPROTO _ TCP, 
IPPROTO UDP,IPPROTO ICMPV6 或 IPPROTO_RM. 

如 果 套 接 字 创 建成 功 , 则 返回 一 个 套 接 字 描 述 符 , 否 则 返回 INVALID. SOCKET 错误 ， 
在 程序 中 可 以 用 WSAGetLastError O 函数 捕获 错误 号 。 


3. 解析 服务 器 主机 名 ,配置 服务 器 地 址 、 端 口 信息 
下 面 的 代码 片段 用 于 通过 主机 名 获取 服务 器 的 IP 地 址 ,当然 ,也 可 以 直接 指定 服务 器 
地 址 。 本 例假 定 服务 器 就 是 本 机 ,所 以 主机 名 使 用 localhost, 代 码 如 下 : 


struct hostent * host; 
host = gethostbynane(" localhost"); 


把 客户 机 要 连接 的 服务 器 地 址 、 端 口 定义 到 SOCKADDR IN 这 个 结构 中 ,为 下 面 的 连 
接 服务 器 作 准 备 , 代 码 如 下 : 


SOCKADDR IN SockAddr; 

SockAddr.sin port = htons(8888); 

SockAddr.sin family = AF INET; 

SockAddr.sin addr.s addr- * ((unsigned long * )host — > h addr); 


现在 ,所 有 的 准备 工作 都 已 完成 , 接 下 来 连接 服务 器 。 
4. 连接 服务 器 


connect(Socket, (SOCKADDR * ) (&SockAddr) , sizeof (SockAddr) ) ; 

如 果 连 接 成 功 , 客 户 机 就 可 以 开始 接收 或 者 发 送 数据 。 假 定 在 成 功 连接 服务 器 后 ,服务 
器 会 立即 向 客户 机 发 送 一 条 欢迎 消息 “服务器 说 : 有 朋 自 远方 来 ,不 亦 乐 平 ”, 客 户 要 做 的 就 
是 接收 并 显示 这 条 消息 。 


5. 接收 数据 并 显示 


char buffer[1024]; 
int nDataLength = recv(Socket, buffer,1024,0); 
std: :cout << buffer; 
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第 1 行 代码 定义 字符 数组 buffer 为 接收 数据 缓冲 区 ,第 2 行 recv() 函 数 从 第 1 个 参数 
指定 的 Socket 接收 数据 ,并 将 接收 到 的 数据 存 和 buffer, 希 望 一 次 接收 的 数据 量 为 1024 字 
节 , 返 回 值 表示 实际 接收 到 的 字 节 数 。 

需要 指出 的 是 ,如 果 没 有 数据 到 达 , 程 序 会 在 recv() 函 数 处 发 生 阻塞 ,一 直 等 待 下 去 。 
因为 本 例 中 没有 显 式 地 设置 套 接 字 工 作 模式 ,默认 为 阻塞 模式 。 


6. 断 开 套 接 字 连 接 


shutdown(socket,SD SEND); 


套 接 字 在 完成 任务 后 ,需要 用 上 面 的 函数 断 开 套 接 字 与 服务 器 之 间 的 连接 ,但 并 不 彻底 
关闭 套 接 字 和 释放 资源 。 就 像 打 完 电话 后 挂机 这 个 动作 ,而 下 面 的 第 7 步 关闭 套 接 字 则 类 
似 于 拆除 电话 机 。 

shutdown() 函 数 有 以 下 几 种 取 值 。 

* SD SEND: 0, 关 闭 套 接 字 发 送 函 数 。 

。 SD_RECIEVE: 1, 关 闭 套 接 字 接收 函数 。 

* SD BOTH; 2, 关 闭 套 接 字 接 收 和 发 送 函 数 。 


7. 关闭 套 接 字 


closesocket( socket) ; 


一 旦 套 接 字 工 作 完 毕 ,应 当 用 上 面 的 代码 将 套 接 字 关闭 ,释放 套 接 字 占用 的 所 有 资源 。 
为 什么 要 在 关闭 套 接 字 之 前 调用 shutdown O P CE? 因为 不 经 shutdown() 直 接 进行 
closesocket O ,可 能 会 有 一 些 缓冲 区 数据 没有 来 得 及 发 送 或 读 取 , 造 成 数据 丢失 。 使 用 
shutdown() 是 为 了 通知 双方 都 不 再 收 / 发 数据 ,给 套 接 字 一 个 结束 缓冲 ,保证 通信 双方 都 能 
完整 地 收 到 对 方 发 出 的 所 有 数据 。 


8. 关闭 WinSock 套 接 字 服 务 ,释放 资源 


WSACleanup(); 


一 旦 完成 了 所 有 任务 ,必须 用 上 面 这 行 代 码 关 闭 WinSock 套 接 字 服务 ,清理 内 存 释放 
资源 。 按 照 以 上 8 个 步骤 ,用 户 可 以 轻松 完成 一 个 阻塞 模式 套 接 字 客户 机 的 编程 任务 。 该 
程序 的 完整 代码 如 程序 2.4 所 示 。 

程序 2.4 阻塞 模式 套 接 字 客户 机 完整 代码 


* include < iostream> 

# include < winsock2. h> 

# pragma conment(lib,"ws2 32.1lib") 
int main() 


( 
//(1) 初 始 化 WinSock 服务 
WSADATA WsaDat; 
if(WSAStartup(MAKEWORD(2, 2) , &lsaDat) ! 0) 
t 
std::cout««"WinSock 错误 — WinSock 服务 初始 化 失败 !NrNn"; 
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WSACleanup(); 
system("PAUSE"); 
return 0; 


} 
//(2) 创 建 套 接 字 
SOCKET Socket = socket ( AF_INET, SOCK STREAM, IPPROTO TCP); 
if(Socket -- INVALID SOCKET) 
( 
std: :cout <<" 套 接 字 错 误 - 创建 套 接 字 失败 !\r\n"; 
WSACleanup(); 
systen("PAUSE") ; 
return 0; 
) 
//(3.1) 主 机 名 解析 
struct hostent * host; 
if( (host = gethostbyname("localhost")) == NULL) 
{ 
std: :cout <<" 主 机 名 解析 失败 !\r\n"; 
WSACleanup( ); 
systen("PAUSE") ; 
return 0; 
) 
//(3.2) 配 置 套 接 字 要 访问 的 服务 器 的 地 址 结构 信息 
SOCKADDR IN SockAddr; 
SockAddr.sin port = htons(8888); 
SockAddr.sin family = AF INET; 
SockAddr.sin addr.s addr- * ((unsigned long * )host -> h addr); 
//(4) 连 接 服 务 器 
if(connect(Socket, (SOCKADDR * ) (&SockAddr) , sizeof (SockAddr))!- 0) 
t 
std: :cout <<" 与 服务 器 连接 失败 !\r\n"; 
WSACleanup(); 
systen("PAUSE") ; 
return 0; 
) 
//(5) 从 服务 器 接收 信息 并 显示 
char buffer[1024]; 
memset(buffer,0,1023); 
int inDataLength = recv(Socket, buffer, 1024, 0) ; 
std: :cout << buffer; 
//(6) 断 开 套 接 字 连 接 ,不 允许 发 送 数据 ,但 可 以 继续 接收 数据 
shutdown( Socket, SD SEND); 
//(7) 关 闭 套 接 字 ,释放 资源 
closesocket (Socket ) ; 
//(8)3& Bl WinSock 服务 ,清理 内 存 
WSACleanup(); 
system("PAUSE"); 
return 0; 


} 

如 果 现 在 直接 在 VS2010 中 测试 程序 ,会 返回 “与 服务 器 连接 失败 1” 的 错误 信息 ,因此 ， 
待 后 面 完 成 服务 器 端 编程 后 一 起 测试 。 

读者 也 可 以 把 程序 2. 4 要 连接 的 主机 设置 为 自己 的 邮箱 使 用 的 E-mail 服务 器 ,将 端口 
设置 为 110 ,看 看 会 发 生 什 么 ? 图 2.11 是 程序 作 了 以 下 修改 后 控制 台 输出 的 运行 结果 。 


host = gethostbyname("pop. 163. com" ) ; 
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SockAddr. sin port = htons(110); 


图 2.11 连接 到 pop. 163. com 服务 器 后 客户 机 收 到 的 响应 


看 看 图 2. 11 所 示 的 运行 结果 ,是 不 是 很 酷 ? 程序 2.4 这 个 小 程序 居然 已 经 可 以 与 第 三 
方 邮件 服务 器 “ 搭 上 话 ”。 现 在 将 阻塞 模式 套 接 字 客户 机 的 编程 步骤 归纳 如 下 : 

(1) 初始 化 WinSock 服务 。 

(2) 创建 套 接 字 。 

(3) 解析 主机 名 ,配置 套 接 字 要 访问 的 服务 器 的 地 址 结构 信息 。 

(4) 连接 服务 器 。 

(5) 从 服务 器 接收 信息 并 显示 。 

(6) 断 开 套 接 字 连 接 , 不 允许 发 送 数据 ,但 可 以 继续 接收 数据 。 

(7) 关闭 套 接 字 。 

(8) 关闭 WinSock 服务 ,释放 资源 。 

在 VS2010 中 创建 项 目测 试 程序 2. 4 的 步骤 如 下 : 

CD 选择 "文件 一 新 建 一 项 目 ” 命 令 ,在 弹出 的 对 话 框 中 将 项 目 类 型 选择 为 "Win32 控制 
台 应 用 程序 ”, 在 项 目 向 导 第 二 步 中 选择 * 空 项 目 ” 复 选 框 。 

(2) 右 击 解 决 方 案 中 的 “ 源 文件 ”, 在 快捷 菜单 中 选择 “添加 一 新 建 项 "命令 ,然后 在 弹出 
的 对 话 框 中 将 文件 类 型 设置 为 “C++ 文 件 (. cpp)”, 接 着 输入 程序 2. 4 的 源 代码 。 

(3) 选择 “调试 开始 执行 (不 调试 )” 命 令 进行 测试 ,由 
于 此 时 没有 服务 器 可 以 使 用 ,运行 结果 如 图 2.12 所 示 。 

如 果 和 暂时 将 服务 器 主机 指定 为 个 人 可 用 的 POP3 服务 
器 ,可 以 获得 图 2. 11 所 示 的 运行 结果 。 


2.3.2 阻塞 模式 套 接 字 服 务 器 编程 


设计 一 个 能 够 与 程序 2.4 客户 机 会 话 的 服务 器 ,服务 器 的 功能 要 求 极为 简单 , 即 收 到 客 
户 机 的 连接 请 求 后 向 客户 机 发 送 一 条 友好 消息 “服务 器 说 ; 有 朋 自 远方 来 ,不 亦 乐平 ”。 
服务 器 的 编程 与 客户 机 的 编程 差异 不 大 , 仅 需 作出 几 处 改变 。 其 编程 步骤 归纳 如 下 。 


1. 启动 并 初始 化 WinSock2 服务 (与 客户 机 同 ) 


C: \WINDO. 


2.12 客户 机 连 不 上 服务 器 


WSADATA WsaDat; 
WSAStartup(MAKEWORD(2, 2) , &WsaDat.) ; 


2. 创建 Socket( 与 客户 机 同 ) 

SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 

3. 填充 服务 器 地 址 、 端 口 信息 到 SOCKADDR IN 中 (有 变化 ) 
与 客户 机 相 比 有 两 处 发 生 了 变化 。 
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(1) 删除 主机 名 解析 ,因为 服务 器 不 需要 主动 连接 客户 机 。 

(2) 将 服务 器 绑 定 的 地 址 设置 为 INADDR_ANY ,表示 不 限定 客户 机 。 
不 变 的 是 ,端口 号 仍 为 8888 。 

修改 后 的 代码 如 下 : 


SOCKADDR IN serverInf; 

serverInf.sin family- AF INET; 
serverInf.sin addr.s addr = INADDR ANY; 
serverInf.sin port = htons(8888); 


4. 绑 定 服务 器 地 址 信息 到 套 接 字 ( 新 增 步 骤 ) 
bind(Socket, (SOCKADDR * ) (&serverInf), sizeof(serverInf)); 
5. 侦 听 客户 连接 (新 增 步 又) 

listen(Socket, 1) ; 

6. 接受 客户 连接 (新 增 步骤 ) 


accept(Socket, NULL, NULL) ; 
注意 : 如 果 没 有 客户 连接 请 求 到 达 ,accept() 函 数 会 发 生 阻塞 ,一 直 等 待 下 去 ,因为 套 接 


字 默 认 工 作 于 阻塞 模式 。 


源 。 


7. 向 客户 机 发 送 数据 


char * szMessage = "服务 器 说 : 有 朋 自 远方 来 ,不 亦 乐平 \r\n"; 


send(Socket, szMessage, strlen(szMessage),0); 

8. 断 开 套 接 字 连接 ,停止 发 送 数据 (与 客户 机 同 ) 
shutdown(socket,SD SEND); 

9. 关闭 套 接 字 ( 与 客户 机 同 ) 


closesocket ( socket) ; 


一 旦 套 接 字 工 作 完毕 ,应 当 用 上 面 的 代码 将 套 接 字 关 闭 ,释放 套 接 字 句柄 所 占用 的 资 
如 果 不 经 shutdown() 直 接 进 行 closesocket() 调 用 可 能 会 丢失 数据 。 使 用 shutdown() 是 为 


了 通知 收 /发 双方 都 不 再 发 送 数据 ,以 保证 通信 双方 都 能 完整 地 收 到 对 方 发 出 的 所 有 数据 。 


10. 关闭 WinSock 套 接 字 服务 .释放 资源 


WSACleanup(); 


该 程序 的 完整 代码 如 程序 2.5 所 示 。 
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HIS 阻塞 模式 套 接 字 服 务 器 完整 代码 


# include < iostream> 
# include < winsock2. h> 
# pragma comment(lib,"ws2 32.1lib") 
int main() 
( 
WSADATA WsaDat; 
if(WSAStartup(MAKEWORD(2, 2) , &WsaDat) !- 0) 
t 
Std: :cout ««"WinSock 服务 初始 化 失败 !\r\n"; 
WSACleanup( ); 
system("PAUSE"); 
return 0; 
} 
SOCKET Socket = socket(AF INET, SOCK_STREAM, IPPROTO TCP); 
if(Socket -- INVALID SOCKET) 
t 
std: :cout <<" 创 建 套 接 字 失败 !\r\n"; 
WSACleanup(); 
system("PAUSE"); 
return 0; 
} 
SOCKADDR_IN serverInf; 
serverInf.sin family = AF INET; 
serverInf.sin addr.s addr = INADDR ANY; 
serverInf.sin port = htons(8888); 
if(bind(Socket, (SOCKADDR * ) (&serverInf),sizeof(serverInf)) == SOCKET ERROR) 
{ 
std: :cout <<" 不 能 绑 定 地 址 信息 到 套 接 字 !\r\n"; 
WSACleanup(); 
systen("PAUSE") ; 
return 0; 
) 
listen(Socket,1); 
SOCKET TempSock = SOCKET_ERROR; 
while(TempSock == SOCKET_ERROR) 
{ 
std: :cout <<" 服 务 器 : 正在 等 待 来 自 客户 机 的 连接 .…\r\n"; 
TempSock = accept(Socket, NULL, NULL) ; 
) 
Socket = TempSock; 
std: :cout <<" 服 务 器 : 有 客户 机 连接 到 达 !\r\n\r\n"; 
char * szMessage = "服务 器 说 : 有 朋 自 远方 来 ,不 亦 乐平 \r\n"; 
send(Socket, szMessage, strlen(szMessage),0); 
// 断 开 套 接 字 连 接 , 不 允许 发 送 数据 
shutdown( Socket, SD SEND); 
// 关 闭 套 接 字 ,释放 资源 
closesocket(Socket) ; 


/ [X] WinSock 服务 ,清理 内 存 
WSACleanup(); 
system("PAUSE"); 

return 0; 


) 
对 程序 2.4 和 程序 2. 5 进行 联合 测试 。 在 VS2010 中 建立 程序 2. 5 的 方法 和 程序 2. 4 
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类 似 ,在 此 不 再 蓝 述 。 其 测试 步骤 如 下 : 

CD 启动 VS2010, 打 开 程 序 2. 5 的 解决 方案 ,首先 
运行 程序 2. 5( 服 务 器 ) ,结果 如 图 2. 13 所 示 。 

(2) 重新 启动 VS2010, 打 开 程 序 2. 4 的 解决 方案 ， 上 一 一 一 一 一 - 
运行 客户 机 。 图 2. 14 是 客户 机 成 功 连接 服务 器 的 界面 ， 图 2.13 服务 器 启动 后 的 运行 界面 
图 2.15 是 服务 器 侦 听 到 客户 机 连接 后 的 运行 界面 。 


C:\WINDOWS\system32\cm... BAR 
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图 2.14 客户 机 连接 到 服务 器 后 收 到 消息 图 2.15 服务 器 侦 听 到 客户 机 连接 后 的 反应 


至 此 ,一 个 基于 阻塞 模式 的 客户 机 /服务 器 对 话 系统 就 建立 了 ,虽然 功能 简单 ,但 遵循 的 
客户 机 、 服 务 器 编程 步骤 是 通用 的 。 在 此 将 服务 器 编程 步骤 整理 如 下 ,请 读者 与 客户 机 编程 
步骤 对 照 学 习 : 

(1) 启动 并 初始 化 WinSock2 服务 (与 客户 机 同 ) 。 

(2) 创建 Socket( 与 客户 机 同 ) 。 

(3) 填充 服务 器 地 址 .端口 信息 到 SOCKADDR IN 中 (有 变化 ) 。 

(4) 绑 定 服务 器 地 址 信息 到 套 接 字 (新 增 步 骤 ) 。 

(5) 侦 听 客户 连接 (新 增 步骤 ) 。 

(6) 接受 客户 连接 (新 增 步 又 ) 。 

(7) 向 客户 机 发 送 数据 。 

(8) 断 开 套 接 字 连接 ,停止 发 送 数据 (与 客户 机 同 ) 。 

(9) 关闭 套 接 字 ( 与 客户 机 同 ) 。 

(10) 关闭 WinSock 套 接 字 服务 (与 客户 机 同 ) 。 


2.3.8 非 阻 塞 模式 套 接 字 客户 机 编程 


非 阻 塞 套 接 字 客户 机 的 设计 和 程序 2.4 有 很 多 相似 之 处 ,主要 的 改变 是 让 套 接 字 工 作 
于 非 阻塞 模式 并 为 程序 增加 一 个 主 循环 。 从 这 个 例子 开始 ,我 们 将 逐渐 增加 一 些 处 理 错误 
的 代码 ,以 增强 程序 的 可 靠 性 。 

设置 套 接 字 工 作 模式 的 代码 如 下 : 

u long iMode= 1; 

ioctlsocket(Socket, FIONBIO, &iMode) ; 

如 果 设 置 iMode 王 0, 套 接 字 将 处 于 阻塞 模式 ; 如 果 设 置 iMode— 1. £ Jer d Ab T AETH. 
塞 模式 。 在 程序 2.6 的 完整 代码 中 ,把 上 面 的 代码 片段 放 到 了 客户 机 完成 连接 之 后 ,因为 如 
果 放 在 客户 机 连接 之 前 ,需要 增加 一 个 循环 来 处 理 连接 不 成 功 重 试 的 情况 。 

在 客户 机 连接 服务 器 之 后 ,就 可 以 开始 接收 数据 了 ,因为 这 里 使 用 的 是 非 阻 塞 模式 ,所 
以 需要 一 个 循环 来 处 理 接收 过 程 , 代 码 如 下 : 


for(;;) 
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// 接 收 并 显示 来 自 服务 器 的 信息 

char buffer[1024]; 

memset (buffer, 0, 1023); 

int inDataLength = recv( Socket, buffer, 1024, 0); 
std: :cout << buffer; 


int nError = WSAGetLastError(); 

if(nError! = WSAEWOULDBLOCK&&nError! = 0) 

t 
std: :cout ««"WinSock 错误 码 : "<< nError ««" Mn"; 
std: :cout <<" 服 务 器 断 开 连 接 !\r\n"; 
break; 

} 

Sleep(1000); 

} 


这 是 一 个 无 限 循环 ,循环 中 增加 了 一 个 错误 处 理 机 制 , WSAGetLastError() 用 于 返回 捕获 


的 错误 码 。 因 为 不 能 保证 服务 器 一 直 在 发 送 数据 ,所 以 WSAEWOULDBLOCK(100035) 错 误 
会 一 直 出 现 。 在 循环 中 这 个 错误 可 以 忽略 , 它 只 是 告诉 用 户 每 次 检查 套 接 字 时 都 发 现 没 有 收 
到 数据 。 如 果 发 生 了 其 他 错误 ,客户 机 将 关闭 。 设 计 完成 的 代码 如 程序 2.6 Bro 。 


程序 2.6 非 阻塞 模式 套 接 字 客户 机 完整 代码 


# include < iostream> 
# include < winsock2.h> 
# pragma comment(lib,"ws2 32.1ib") 


int main(void) 
{ 
WSADATA WsaDat; 
if(WSAStartup(MAKEWORD(2, 2) , &WsaDat) !- 0) 
t 
std: :cout <<"WinSock 错误 一 WinSock 初始 化 失败 \r\n"; 
WSACleanup(); 
systen("PAUSE") ; 
return 0; 


) 
// 创 建 套 接 字 


SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
if(Socket == INVALID SOCKET) 
{ 
std: :cout <<"WinSock 错误 - 创建 套 接 字 失 败 !\r\n"; 
WSACleanup(); 
system("PAUSE"); 
return 0; 


} 


// 解 析 主 机 名 
struct hostent * host; 
if( (host = gethostbyname("localhost")) == NULL) 
{ 
std: :cout <<" 解 析 主 机 名 失败 !\r\n"; 
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WSACleanup(); 
system("PAUSE"); 
return 0; 


) 


// 配 置 套 接 字 地 址 结构 信息 

SOCKADDR IN SockAddr; 

SockAddr.sin port - htons(8888); 

SockAddr.sin family- AF INET; 

Sockhddr.sin addr.s addr- * ((unsigned long * )host —» h addr); 


// 连 接 服务 器 
if(connect(Socket, (SOCKADDR * ) (&SockAddr) , sizeof (SockAddr))!- 0) 
t 

std: :cout <<" 连 接 服务 器 失败 !\r\n"; 

WSACleanup(); 

systen("PAUSE") ; 

return 0; 


) 


//iMode = 0 是 阻塞 模式 
u long iMode- 1; 
ioctlsocket(Socket, FIONBIO, &iMode); 


// 主 循环 
for(;;) 
t 
// 接 收服 务 器 信息 
char buffer[1024]; 
memset (buffer, 0,1023); 
int inDataLength = recv(Socket, buffer, 1024, 0); 
std: :cout << buffer; 


int nError = WSAGetLastError(); 
if(nError!- WSAEWOULDBLOCK && nError!- 0) 
t 
std: :cout ««"WinSock 错误 码 为 : "<< nError <<"\r\n"; 
std: :cout <<" 服 务 器 断 开 连 接 !\r\n"; 
// 断 开 套 接 字 , 只 能 接收 不 能 发 送 
shutdown(Socket,SD SEND); 


// 关 闭 套 接 字 
closesocket(Socket) ; 


break; 
) 
S1eep(1000); 
) 


WSACleanup(); 
system("PAUSE"); 
return 0; 


} 


与 之 前 一 样 在 VS2010 中 先 建 立 程序 2. 6 ,但 不 急于 测试 ,程序 2. 6 将 与 后 面 的 服务 器 
程序 2. 7 联合 测试 。 


56, Windows 网 络 编程 案例 教程 
NA 


2.3.4 非 阻塞 模式 套 接 字 服 务 器 编程 


非 阻塞 套 接 字 适用 于 服务 器 的 编程 ,用 户 总 是 希望 服务 器 能 同时 处 理 更 多 的 事务 ,而 不 
是 仅仅 在 那里 坐等 某 一 个 连接 。 非 阻塞 套 接 字 服务 器 编程 与 程序 2. 5 的 阻塞 套 接 字 服务 器 
编程 类 似 , 其 中 ,前 面 5 个 步骤 相同 : 

CD 初始 化 套 接 字 。 

(2) 创建 套 接 字 。 

(3) 配置 SOCKADDR IN 地 址 信息 。 

(4) 套 接 字 与 地 址 绑 定 。 

(5) 在 套 接 字 上 侦 听 。 

(6) 接受 来 自 客户 机 的 连接 。 

注意 : 以 下 开始 改变 。 

(6) 设置 套 接 字 工 作 模式 。 

为 了 让 服务 器 工作 于 非 阻塞 模式 ,在 此 处 加 入 套 接 字 工 作 模式 设置 : 

u long iMode = 1; 

ioctlsocket(Socket, FIONBIO, &iMode); 

CO 构建 主 循环 。 

// 主 循环 

for(;;) 

a * szMessage = " 非 阻塞 服务 器 说 : 有 朋 自 远方 来 ,不 亦 乐 乎 \r\n"; 


send(Socket, szMessage, strlen( szMessage), 0); 


int nError = WSAGetLastError(); 

if(nError!= WSAEWOULDBLOCK && nError!= 0) 

{ 
std: :cout <<"WinSock 错误 码 为 : "<< nError <<"\r\n"; 
std: :cout <<" 客 户 机 断 开 连 接 !\r\n"; 


// 断 开 套 接 字 连 接 , 不 允许 发 送 ,但 可 以 接收 
shutdown(Socket,SD SEND); 


// 关 闭 套 接 字 
closesocket(Socket) ; 


break; 
} 


Sleep(1000); 


(8) 关闭 套 接 字 服务 ( 断 开 套 接 字 连 接 和 关闭 套 接 字 放 到 了 主 循环 里 ) 。 
实现 上 述 设计 的 代码 如 程序 2.7 所 示 。 
程序 2.7 非 阻塞 模式 套 接 字 服务 器 完整 代码 


# include < iostream> 
# include <winsock2.h> 
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# pragma comment(lib,"ws2 32.1ib") 


int main() 
t 
WSADATA WsaDat; 
if(WSAStartup(MAKEWORD(2, 2) , &WsaDat) !- 0) 
t 
std: :cout <<"WinSock 服务 初始 化 失败 !\r\n"; 
WSACleanup(); 
system("PAUSE"); 
return 0; 


SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
if(Socket -- INVALID SOCKET) 
t 

std: :cout <<" 创 建 套 接 字 失败 !\r\n"; 

WSACleanup(); 

systen("PAUSE") ; 

return 0; 


SOCKADDR IN serverInf; 

serverInf.sin family- AF INET; 
serverInf.sin addr.s addr = INADDR ANY; 
serverInf.sin port = htons(8888); 


if(bind(Socket, (SOCKADDR * ) (&serverInf),sizeof(serverInf)) == SOCKET ERROR) 
t 

std: :cout <<" 套 接 字 绑 定 失败 !\r\n"; 

WSACleanup(); 

system("PAUSE"); 

return 0; 


listen(Socket, 1); 


SOCKET TempSock = SOCKET ERROR; 

while(TempSock -- SOCKET ERROR) 

[i 
std: :cout <<" 服 务 器 : 正在 等 待 客户 机 连接 .…\r\n"; 
TempSock = accept(Socket, NULL, NULL) ; 


Socket - TempSock; 
std: :cout <<" 服 务 器 说 : 有 新 客户 机 连接 到 达 !\r\n\r\n"; 


//iModet- 0 表示 阻塞 模式 
u long iMode= 1; 
ioctlsocket(Socket, FIONBIO, &iMode); 


// 主 循环 
for(;;) 
{ 
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char * szMessage = " 非 阻塞 服务 器 说 : 有 朋 自 远方 来 ,不 亦 乐 乎 \r\n"; 
send(Socket, szMessage, strlen(szMessage),0); 


int nError - WSAGetLastError(); 

if(nError!- WSAEWOULDBLOCK && nError!- 0) 

{ 
std: :cout <<"WinSock 错误 码 为 : "<< nError <<"\r\n"; 
std: :cout <<" 客 户 机 断 开 连 接 !\r\n"; 


// 断 开 套 接 字 ,不 允许 发 送 ,可 以 接收 
shutdown( Socket, SD_SEND) ; 


// 关 闭 套 接 字 
closesocket(Socket) ; 


break; 
) 


Sleep(1000); 
) 


WSACleanup(); 
system("PAUSE") ; 
return 0; 


) 

在 VS2010 中 建立 程序 2.7。 程 序 2.7 与 程序 2.6 联合 ES 
测试 的 步骤 如 下 : t 

(1) 启动 VS2010, 打 开 服 务 器 程序 2.7, 运 行 结果 如 
图 2. 16 所 示 , 此 时 服务 器 处 于 等 待 客户 机 连接 状态 。 

(2) 重新 启动 VS2010 ,打开 客户 机 程序 2.6 ,运行 结果 如 图 2. 17 所 示 ,此 时 客户 机 连接 
到 服务 器 上 并 且 收 到 了 服务 器 不 断 发 来 的 问候 。 

(3) 再 来 观察 服务 器 控制 台 , 界 面 如 图 2. 18 所 示 ,可见 服 务 器 发 现 了 新 客户 机 连接 并 
接受 了 连接 。 


图 2.16 服务 器 启动 后 的 界面 


图 2.17 非 阻 塞 客户 机 连接 非 阻塞 服务 器 后 的 界面 图 2.18 服务 器 接受 客户 机 连接 后 的 界面 


(4) 如 果 此 时 断 开 客户 机 连接 ,服务 器 端的 显示 界面 如 图 2. 19 所 示 。 
(5) 如 果 先 行 关 掉 服 务 器 ,观察 客户 机 的 运行 界面 ,如 图 2. 20 所 示 。 
如 果 顺 利 完成 了 上 述 联合 测试 ,相信 读者 会 备 感 愉悦 ,并 对 未 来 的 网 络 编程 信心 满 满 。 
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图 2. 19 服务 器 在 客户 机 先行 断 开 连接 后 的 界面 ”图 2.20 客户 机 在 服务 器 先行 断 开 连接 后 的 界面 


2.3.5 ERFARE 


为 了 便于 读者 快速 入门 ,前面 并 没有 过 多 涉及 错误 处 理 机 制 。 经 验 丰富 的 程序 员 通 常 
有 一 个 优秀 的 习惯 ,就 是 一 丝 不 苟 地 审视 程序 中 可 能 出 现 错误 的 地 方 并 提供 容错 机 制 ,避免 
程序 崩溃 。 在 此 以 程序 2.5 阻塞 套 接 字 服 务 器 编程 为 例 进行 介绍 ,下 面 列 举 错误 处 理 的 3 
段 程序 ,请 读者 仔细 体会 。 


1. 错误 处 理 1 


WSAStartup() 函数 执行 失败 时 将 返回 一 个 WinSock 错误 码 。 程 序 2.5 初始 化 
WinSock 服务 的 代码 如 下 : 


WSADATA WsaDat; 
if(WSAStartup(MAKEWORD(2, 2) , &WsaDat)!= 0) 
( 
std: :cout ««"WinSock 服务 初始 化 失败 !\r\n"; 
WSACleanup(); 
systen("PAUSE") ; 
return 0; 


) 
如 果 将 代码 修改 如 下 : 


WSADATA WsaDat; 
int nResult = WSAStartup(MAKEWORD(2, 2) , &WsaDat) ; 
if(nResult!- 0) 
( 
std: :cout <<" WinSock 服务 初始 化 失败 ,错误 码 : "<< nResult «" Vn"; 
WSACleanup(); 
system("PAUSE") ; 
return 0; 


) 

用 户 就 可 以 获知 出 错 的 类 型 和 原因 。 为 了 对 这 有 段 程序 进行 测试 ,可 以 修改 上 面 的 第 二 
行 代码 如 下 : 

int nResult = WSAStartup(MAKEHORD(0, 0), gHsaDat) ; 


由 于 不 存在 版 本 号 为 0. 0 的 WinSock 链接 库 ,控制 台中 会 反馈 以 下 错误 信息 : 
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WinSock 服务 初始 化 失败 ,错误 码 :10092 
按 任意 键 继续 … 


程序 中 的 错误 码 10092 可 以 用 宏 常量 WSAVERNOTSUPPORTED 替换 ,这 个 错误 码 
表示 指定 版 本 不 存在 。 如 果 WSAStartup() 成 功 执行 ,还 可 以 使 用 WSAGetLastError() 继 
续 捕获 最 近 发 生 的 其 他 错误 。 


2. 错误 处 理 2 


接 下 来 的 代码 是 创建 套 接 字 ,如 果 创 建 不 成 功 怎么 办 ? 把 程序 2. 5 中 的 代码 稍 作 修改 
即 可 捕获 错误 原因 : 
SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
if(Socket -- INVALID SOCKET) 
t 
int nError - WSAGetLastError(); 
std: :cout <<" 创 建 套 接 字 失败 ,错误 码 : "<< nError<<"\ r\n"; 
WSACleanup(); 
system("PAUSE"); 
return 0; 


} 
为 了 测试 效果 ,把 第 1 行 创建 套 接 字 的 代码 修改 如 下 : 
SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO UDP); 
上 面 的 第 2 个 参数 和 第 3 个 参数 将 TCPCSOCK. STREAM) 和 UDPCIPPROTO. UDP) 4 
误 搭配 是 行 不 通 的 。 和 运行 这 个 程序 会 出 现 错误 码 为 10043 (WSAEPROTONOSUPPORT) 的 
n 


ps 


错误 处 理 2 提供 的 代码 可 以 帮助 用 户 处 理 套 接 字 创建 过 程 中 出 现 的 所 有 错误 ,好 极 了 ， 
不 是 吗 ? 


3. 错误 处 理 3 


成 功 创建 套 接 字 后 , 接 下 来 的 步骤 是 配置 SOCKADDR IN 地 址 结构 信息 ,然后 进行 套 
接 字 绑 定 。 但 如 果 绑 定 过 程 发生 错 误 怎 么 办 ? 下 面 这 段 代码 可 以 搞定 一 切 : 


if(bind(Socket, (SOCKADDR * ) (&serverInf),sizeof(serverInf)) == SOCKET ERROR) 
( 
int nError = WSAGetlastError(); 
std: :cout <<" 不 能 绑 定 地 址 信息 到 套 接 字 ,错误 码 : "<< nError <<"\r\n"; 
WSACleanup(); 
system("PAUSE"); 
return 0; 


) 

当 服 务 器 上 有 其 他 的 程序 正在 使 用 与 本 套 接 字 相 同 的 端口 时 ,一 定 会 发 生 10048 
(WSAEADDRINUSE) 错 误 , 因 为 服务 器 不 允许 两 个 进程 使 用 相同 的 端口 。 

通过 前 面 的 演示 ,读者 可 能 体会 到 了 WSAGetLastError() 是 一 个 很 好 用 的 函数 。 那 
么 ,为 什么 不 立即 动手 用 这 个 函数 来 试 着 解决 接 下 来 服务 器 侦 听 和 断 开 连接 等 处 可 能 出 现 
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的 错误 呢 ? 程序 2.5 增强 容错 性 后 的 代码 如 程序 2. 8 所 示 。 
HIS 套 接 字 错误 处 理 完整 代码 


# include < iostream> 
# include < winsock2.h> 
* pragma comment(lib,"ws2 32.1lib") 


int main() 


( 


WSADATA WsaDat; 
int nResult = WSAStartup(MAKEWORD(2, 2) , &WsaDat) ; 
if(nResult!- 0) 


{ 


} 


std: :cout <<"WinSock 服务 初始 化 失败 ,错误 码 : "<< nResult <<"\r\n"; 
WSACleanup(); 

system("PAUSE"); 

return 0; 


SOCKET Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
if(Socket == INVALID SOCKET) 


t 


) 


int nError = WSAGetLastError(); 

std: :cout <<" 创 建 套 接 字 失败 ,错误 码 : "<< nError <<"\r\n"; 
WSACleanup(); 

system("PAUSE"); 

return 0; 


SOCKADDR IN serverInf; 

serverInf.sin family = AF INET; 
serverInf.sin addr.s addr - INADDR ANY; 
serverInf.sin port = htons(8888); 


if(bind(Socket, (SOCKADDR * ) (&serverInf),sizeof(serverInf)) -- SOCKET ERROR) 


{ 


) 


int nError = WSAGetLastError(); 

std: :cout <<" 不 能 绑 定 地 址 信息 到 套 接 字 , 错 误 码 : "<< nError <<"\r\n"; 
WSACleanup(); 

systen("PAUSE") ; 

return 0; 


if(listen(Socket,1) -- SOCKET ERROR) 


{ 


} 


int nError = WSAGetLastError( ); 

std: :cout <<" 不 能 启动 套 接 字 侦 听 功 能 , 错误 码 : "<< nError <<"\r\n"; 
WSACleanup(); 

systen("PAUSE") ; 

return 0; 


SOCKET TempSock = SOCKET ERROR; 
while(TempSock == SOCKET ERROR) 


{ 


std: :cout <<" 服 务 器 : 正在 等 待 来 自 客户 机 的 连接 .…\r\n"; 
TempSock = accept(Socket, NULL, NULL) ; 
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Socket = TempSock; 
std: :cout <<" 服 务 器 : 有 客户 机 连接 到 达 !\r\n\r\n"; 


char * szMessage = "服务 器 说 : 有 朋 自 远方 来 ,不 亦 乐平 \r\n"; 
send(Socket, szMessage, strlen( szMessage), 0); 

// 断 开 套 接 字 连接 

if(shutdown(Socket,SD SEND) == SOCKET ERROR) 


t 
int nError - WSAGetLastError(); 
std: :cout <<" 不 能 断 开 套 接 字 连接 ,错误 码 : "<< nError <<"\r\n"; 
closesocket(Socket) ; 
WSACleanup(); 
system("PAUSE"); 
return 0; 


} 

// 关 闭 套 接 字 
closesocket(Socket) ; 
// 关 闭 WinSock 服务 
WSACleanup(); 
system("PAUSE"); 
return 0; 


) 
许多 时 候 , 程 序 的 健壮 性 代表 程序 的 生命 力 , 就 像 Windows XP 一 样 长 盛 不 衰 。 


&.4 异步 套 接 字 编程 


本 节 讨论 异步 套 接 字 编程 ,并 为 程序 设计 Windows 窗 体 界面 ,如 果 读 者 不 太 熟 悉 
Win32 窗 体 程序 设计 ,建议 先 从 2. 1 节 给 出 的 3 个 入 门 小 例子 开始 。 


2.4.1 异步 套 接 字 客 户 机 编程 


异步 套 接 字 编程 从 创建 一 个 简单 的 通信 客户 机 开始 ,实现 客户 机 与 服务 器 的 点 对 点 对 
话 , 即 客户 机 向 服务 器 发 送 消息 ,接收 并 显示 来 自 服务 器 的 消息 ,程序 的 初始 运行 界面 如 
图 2.21 所 示 。 窗 体 上 包含 两 个 文本 框 ,分 别 用 来 输入 发 送 的 消息 和 显示 收 到 的 消息 ,按钮 
用 来 发 送 消 息 。 其 创建 步骤 如 下 : 
至 异 步 套 接 字 客 户 机 


图 2. 21 异步 套 接 字 客户 机 运行 界面 
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1. 创建 程序 界面 ,显示 窗 体 和 控件 


程序 2. 3 几乎 不 用 修改 即 可 拿 到 本 例 使 用 ,假设 读者 已 经 非常 熟悉 这 部 分 代码 ,这 里 不 再 
对 其 进行 解释 ,现在 假定 已 经 完成 窗 体 及 控件 的 创建 , 窗 体 上 放置 了 两 个 文本 框 和 一 个 按钮 。 


2. 定义 宏 常量 
在 程序 的 头 部 定义 以 下 宏 常 量 : 


# define IDC EDIT IN 101 // 接 收 信息 文本 框 标识 符 
# define IDC EDIT OUT 102 // 发 送信 息 文 本 框 标 识 符 
# define IDC MAIN BUTTON 103 // 按 钮 标识 符 

# define WM SOCKET 104 // 标 识 异 步 套 接 字 事件 消息 


在 程序 中 要 依靠 窗 体 回调 函数 处 理 WinSock 套 接 字 事件 ,这 与 前 面 的 套 接 字 编程 极为 
不 同 ,后 面 的 程序 使 用 WM_SOCKET(104) 标 识 异 步 套 接 字 事 件 消息 。 


3. 初始 化 异步 套 接 字 


在 WM_CREATE 消息 多 辑 中 除了 加 入 两 个 编辑 框 和 一 个 按钮 的 初始 化 代码 以 外 ,还 
需要 在 后 面 加 入 以 下 的 初始 化 WinSock 套 接 字 的 代码 ; 


WSADATA WsaDat; 

int nResult = WSAStartup(MAKEWORD(2, 2) , &WsaDat) ; 

if(nResult!- 0) 

( 
MessageBox( hWnd, "WinSock $J fti (E A We!" , "严重 错误 ", MB. ICONERROR) ; 
SendMessage( hWnd, WM. DESTROY, NULL, NULL) ; 
break; 

) 


这 段 代 码 除 了 用 MessageBox() 弹 出 错误 消息 框 以 外 ,与 前 面 的 套 接 字 初始 化 没有 什么 
不 同 。 接 下 来 创建 套 接 字 , 代 码 如 下 : 


Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 

if(Socket == INVALID SOCKET) 

{ 
MessageBox(hWnd, "创建 套 接 字 失 败 !", "严重 错误 ", MB. ICONERROR) ; 
SendMessage(hiind, WM. DESTROY, NULL, NULL) ; 
break; 


) 


这 段 代码 也 没有 什么 新 内 容 ,真正 的 变化 从 下 面 开始 ,程序 需要 调用 WSAAsyncSelect O 


通知 套 接 字 有 请 求 事件 发 生 , WSAAsyncSelect() 利 用 了 Windows 的 消息 处 理 机 制 。 其 函 
数 原型 如 下 : 


int WSAAsyncSelect( 
. in SOCKET s, 
in HWND hWnd, 
. in unsigned int wMsg, 
in long lEvent 
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其 参数 的 含义 如 下 。 

tos: 标识 一 个 需要 事件 通知 的 套 接 字 描述 符 。 

* hWnd: 标识 一 个 在 网 络 事件 发 生 时 需要 接收 消息 的 窗 体 句 柄 。 

* wMsg: 在 网 络 事件 发 生 时 要 接收 的 消息 。 

* lEvent: 位 屏蔽 码 , 用 于 指明 应 用 程序 感 兴趣 的 网 络 事件 集合 。 

本 函数 只 要 检测 到 由 IEvent 参数 指明 的 网 络 事件 发 生 ,就 会 请 求 WinSock 服务 为 窗 体 


一 条 消息 ,要 发 送 的 消息 由 wMsg 参数 标识 ,发 生 事件 的 套 接 字 由 s 标识 。 


本 函数 自动 将 套 接 字 设置 为 非 阻塞 模式 ,函数 执行 成 功 时 的 返回 值 为 0。 
WSAAsyncSelect() 可 以 侦 听 到 的 事件 如 表 2. 5 Bros o 


R25 套 接 字 事件 列表 


事件 (IEvent 参数 的 值 ) 标 识 事件 描述 
FD_READ 数据 到 达 套 接 字 时 触发 
FD_WRITE 套 接 字 准备 好 发 送 数据 时 触发 
FD_OOB 带 外 数据 到 达 套 接 字 时 触发 
FD_ACCEPT 有 连接 到 达 套 接 字 时 触发 
FD_CONNECT 套 接 字 间 连 接 完成 时 触发 
FD_CLOSE 套 接 字 关闭 时 触发 
FD_QOS 套 接 字 服务 质量 改变 时 触发 
FD_GROUP_QOS 保留 事件 , 套 接 字 组 服务 质量 改变 时 触发 
FD_ROUTING_INTERFACE_CHANGE 目标 地 址 的 路 由 接口 发 生变 化 时 触发 
FD_ADDRESS LIST_CHANGE 套 接 字 本 地 地 址 列表 变化 时 触发 


本 例 中 调用 WSAAsyncSelect0 〇 的 代码 如 下 : 


nResult = WSAAsyncSelect(Socket, hWnd, WM SOCKET, (FD CLOSE|FD READ)); 

if(nResult) 

{ 
MessageBox( hWnd, "WSAAsyncSelect 网 络 事件 设置 失败 !", "严重 错误 ", MB. ICONERROR) ; 
SendMessage ( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 

} 


4. 配置 套 接 字 地 址 信息 
配置 SOCKADDR_IN 地 址 结构 信息 与 前 面 的 方法 一 样 ,其 代码 如 下 : 


struct hostent * host; 

if( (host = gethostbyname(szServer)) == NULL) 

{ 
MessageBox(hWnd, "主机 名 解析 失败 !", "严重 错误 ", MB. ICONERROR) ; 
SendMessage( hWnd, WM. DESTROY, NULL, NULL) ; 
break; 

) 

SOCKADDR IN SockAddr; 

SockAddr.sin port = htons(nPort); 

SockAddr.sin family = AF INET; 

SockAddr.sin addr.s addr- * ((unsigned long * )host -> h addr); 
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5. 连接 服务 器 
connect (Socket, ( LPSOCKADDR) ( &SockAddr) , sizeof ( SockAddr) ) ; 


6. 在 窗 体 回 调 函数 中 处 理 套 接 字 消息 事件 


前 面 WSAAsyncSelect() 函数 为 套 接 字 设置 了 FD CLOSE 或 FD_READ 事件 发 生 时 
将 立即 触发 WM. SOCKET 消息 ,程序 员 可 以 用 下 面 的 代码 段 处 理 套 接 字 的 读数 据 和 关闭 
事件 : 


switch(WSAGETSELECTEVENT( lParam) ) 
{ 

case FD_READ: 

{ 

) 

break; 


case FD CLOSE: 
t 
) 
break; 
) 


将 下 面 的 代码 段 插入 到 case FD. READ 后 面 , 读 取 到 达 套 接 字 的 数据 ; 


char szIncoming[1024]; 

ZeroMemory(szIncoming, sizeof (szIncoming)); 

int inDataLength = recv(Socket, (char * ) szIncoming, sizeof(szIncoming)/sizeof(szIncoming[0]), 0) ; 

strncat(szHistory,szIncoming, inDataLength); 

strcat(szHistory, Arn"); 

SendMessage(hEditIn, WM SETTEXT, sizeof(szIncoming) - 1,reinterpret cast < LPARAM »(&szHistory)); 

上 面 这 段 代 码 接收 数据 ,并 用 SendMessage 函数 发 送 WM. SETTEXT 消息 给 回调 函 

数 ,回调 函数 将 收 到 的 信息 在 hEditIn 编辑 框 中 显示 。 

为 了 使 客户 机 能 够 处 理 服务 器 关闭 连接 的 情况 ,需要 在 FD_CLOSE 部 分 加 入 以 下 代 
[n 

MessageBox( hWnd, "服务 关闭 了 连接 !", "连接 关闭 ", MB. ICONINFORMATION|MB OK); 

closesocket(Socket) ; 

SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 

至 此 ,基于 异步 套 接 字 模式 的 客户 机 设计 完成 ,这 个 程序 较 前 面 的 编程 加 入 了 更 多 的 新 
概念 和 方法 ,请 读者 参考 程序 2. 9 所 示 的 完整 代码 进行 学 习 。 

程序 2.9 异步 套 接 字 客 户 机 完整 代码 


# include < winsock2. h> 
# include < windows. h> 


# pragma connent(lib,"ws2 32.lib") 


# define IDC_EDIT_IN 101 
# define IDC EDIT OUT 102 
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Ne 


f define IDC MAIN BUTTON 103 
f define WM SOCKET 104 


char * szServer = "localhost"; 
int nPort = 5555; 


HWND hEditIn - NULL; 
HWND hEditOut = NULL; 
SOCKET Socket - NULL; 
char szHistory[10000]; 


LRESULT CALLBACK WinProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); 


int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR lpCmdLine, int nShowCnd) 
( 

WNDCLASSEX wClass; 

ZeroMemory(&wClass, sizeof (WNDCLASSEX)); 
wClass.cbClsExtra = NULL; 

wClass. cbSize = sizeof(WNDCLASSEX); 

wClass. cbWndExtra = NULL; 

wClass. hbrBackground = (HBRUSH)COLOR WINDOW; 
wClass. hCursor = LoadCursor(NULL, IDC ARROW); 
wClass. hIcon - NULL; 

wClass. hIconSm = NULL; 

wClass. hInstance - hInst; 

wClass. lpfnWndProc - (WNDPROC)WinProc; 
wClass. lpszClassName = "Window Class"; 
wClass. lpszMenuName - NULL; 

wClass. style = CS HREDRAW|CS VREDRAW; 


if(!RegisterClassEx(&wClass)) 
{ 
int nResult = GetLastError(); 
MessageBox( NULL, 
" 窗 体 类 注册 失败 !\r\n"， 
" 窗 体 类 错误 "， 
MB ICONERROR); 


HWND hnd = CreateWindowEx( NULL, 
"Window Class", 
"异步 套 接 字 客户 机 "， 
WS_OVERLAPPEDWINDOW, 


if(! hWnd) 
{ 
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int nResult - GetLastError(); 
MessageBox( NULL, 
"创建 窗 体 失败 \r\n 错误 码 : ", 
"创建 窗 体 失败 "， 
MB ICONERROR); 
) 


ShowWindow(hWnd, nShowCnd) ; 


MSG msg; 
ZeroMemory(&nsg, sizeof(MSG)) ; 


while(GetMessage(&msg, NULL, 0, 0) ) 
t 
TranslateMessage(&nsg) ; 
DispatchMessage(&nsg) ; 


return 0; 


) 


LRESULT CALLBACK WinProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) 
( 
Switch(msg) 
{ 
case WM CREATE: 
{ 


ZeroMemory( szHistory, sizeof(szHistory)); 


// 创 建 接收 消息 框 
hEditIn = CreateWindowEx(WS EX CLIENTEDGE, 
"EDIT", 


v 


WS CHILD|WS VISIBLE|ES MULTILINE| 
ES AUTOVSCROLL|ES AUTOHSCROLL, 
50, 
100, 
400, 
200, 
hWnd, 
(HMENU) IDC_EDIT_IN, 
GetModuleHandle(NULL), 
NULL); 
if(!hEditIn) 
t 
MessageBox( hWnd, 
"不 能 创建 接收 消息 框 "， 
"RR", 
MB_OK|MB_ICONERROR) ; 
} 
HGDIOBJ hfDefault = GetStockObject(DEFAULT GUI FONT); 
SendMessage(hEditIn, 
WM SETFONT, 
(WPARAM)hfDefault, 
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MAKELPARAM(FALSE, 0) ) ; 
SendMessage(hEditIn, 

WM SETTEXT, 

NULL, 

(LPARAM) "正在 连接 服务 器 .…”) ; 


// 创 建 发 送 消息 框 
hEditOut = CreateWindowEx(WS_EX_CLIENTEDGE, 
"EDIT", 


mm 


WS CHILD|WS VISIBLE|ES MULTILINE| 


ES AUTOVSCROLL|ES AUTOHSCROLL, 
50, 
30, 
400, 
60, 
hWnd, 
(HMENU)IDC EDIT IN, 
GetModuleHandle(NULL), 
NULL); 
if(!'hEditOut) 
{ 
MessageBox( hWnd, 
"不 能 创建 发 送 消息 框 "， 
"错误 "， 
MB OK|MB ICONERROR); 
) 


SendMessage(hEditOut, 
WM SETFONT, (WPARAM) hfDefault, 
MAKELPARAM(FALSE, 0) ) ; 
SendMessage(hEditOut, 
WM SETTEXT, 
NULL, 
(LPARAM) "在 这 里 输入 要 发 送 的 消息 …") ; 


// 创 建 发 送 按钮 

HWND hWndButton = CreateWindow( 
"BUTTON", 
"发 送 "， 
WS TABSTOP|WS VISIBLE| 
WS CHILD|BS DEFPUSHBUTTON, 
50, 
310, 
75, 
23, 
hWnd, 
(HMENU)IDC MAIN BUTTON, 
GetModuleHandle(NULL), 
NULL); 


SendMessage(hiindButton, 
WM SETFONT, 
(WPARAM) hfDefault, 
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MAKELPARAM(FALSE, 0) ) ; 


// 配 置 WinSock 套 接 字 
WSADATA WsaDat; 
int nResult = WSAStartup(MAKEWORD(2, 2) , &WsaDat) ; 
if(nResult!- 0) 
t 
MessageBox( hWnd, 
"WinSock 初始 化 失败 "， 
"FERR", 
MB_ICONERROR) ; 
SendMessage( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 
} 


Socket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
if(Socket -- INVALID SOCKET) 
t 
MessageBox( hWnd, 
"创建 套 接 字 失败 "， 
"FERR", 
MB_ICONERROR) ; 
SendMessage( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 
} 


nResult = NSAAsyncSelect(Socket, hWnd, WM SOCKET, (FD CLOSE|FD READ)); 
if(nResult) 
{ 
MessageBox( hWnd, 
"WSAAsyncSelect 异步 套 接 字 初始 化 失败 "， 
"FERR", 
MB_ICONERROR) ; 
SendMessage( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 
} 


// 主 机 名 称 解 析 
struct hostent * host; 
if((host = gethostbyname(szServer)) -- NULL) 
t 
MessageBox( hWnd, 
"不 能 解析 主机 名 "， 
"严重 错误 "， 
MB ICONERROR); 
SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 
break; 
) 


// 配 置 套 接 字 地 址 信息 

SOCKADDR IN SockAddr; 

SockAddr.sin port = htons(nPort); 

SockAddr.sin family = AF INET; 

SockAddr.sin addr.s addr- * ((unsigned long * )host ->h addr); 
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connect(Socket, ( LPSOCKADDR) ( &SockAddr ) , sizeof (SockAddr) ) ; 
} 
break; 


case WM_COMMAND: 


switch(LOWORD(wParam)) 
t 
case IDC_MAIN_BUTTON: 
£ 
char szBuffer[1024]; 
ZeroMemory(szBuffer, sizeof(szBuffer)); 
SendMessage(hEditOut, 
WM GETTEXT, 
sizeof(szBuffer), 
reinterpret cast < LPARAM»(szBuffer)); 
send(Socket, szBuffer, strlen(szBuffer),0); 
SendMessage(hEditOut,WM SETTEXT, NULL, (LPARAM) "") ; 
} 
break; 
} 
break; 


case WM_DESTROY: 

{ 
PostQuitMessage(0); 
shutdown( Socket, SD BOTH); 
closesocket(Socket) ; 
WSACleanup(); 
return 0; 

) 

break; 


case WM SOCKET: 
{ 
if(WSAGETSELECTERROR( lParam) ) 
t 
MessageBox( hWnd, 

"异步 套 接 字 设置 失败 "， 

"Bs", 

MB OK|MB ICONERROR); 
SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 
break; 

i 
Switch(WSAGETSELECTEVENT( lParam) ) 
{ 
case FD READ: 
t 
char szIncoming[1024]; 
ZeroMemory( szIncoming, sizeof(szIncoming)); 


int inDataLength  recv(Socket, 
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szIncoming, 
sizeof(szIncoming)/sizeof(szIncoming[0]), 
0); 


strncat(szHistory, szIncoming, inDataLength) ; 
strcat(szHistory, Mn") ; 


SendMessage(hEditIn, 
WM SETTEXT, 
sizeof(szIncoming) 一 1， 
reinterpret cast < LPARAM »(&szHistory)); 


) 
break; 


case FD CLOSE: 
{ 
MessageBox( hWnd, 
"服务 器 关闭 了 连接 "， 
"连接 关闭 "， 
MB ICONINFORMATION|MB OK); 
closesocket(Socket) ; 
SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 


) 
break; 


) 


return DefWindowProc(hWnd, msg, wParam, lParam); 
) 


在 VS2010 中 创建 程序 2.9 的 步骤 如 下 : 

CD 选择 “文件 一 新 建 习 项目” 命令 ,在 弹出 的 对 话 框 中 将 项 目 类 型 选择 为 “Win32 项 
目 ”, 在 项 目 向 导 第 二 步 中 选择 “ 空 项 目 ” 复 选 框 。 

(2) 右 击 解决 方案 中 的 “ 源 文件 ”, 在 快捷 菜单 中 选择 “添加 一 新 建 项 ”命令 ,然后 在 弹出 
的 对 话 框 中 将 文件 类 型 设置 为 “C++ 文件 (. cpp)”, 并 输入 程序 2. 9 的 源 代码 。 

(3) 选择 “调试 一 开始 执行 (不 调试 )” 命 令 进行 测试 ,由 于 此 时 没有 服务 器 可 用 ,运行 结 
果 如 图 2. 21 Bros , 待 后 面 的 服务 器 程序 完成 后 再 联合 测试 。 


2.4.2 异步 套 接 字 服务 器 编程 


如 果 读 者 已 经 成 功 地 完成 了 程序 2. 9, 那 么 接 下 来 将 会 看 到 服务 器 的 编程 与 之 极为 相 
似 , 只 是 增加 了 一 些 必要 的 服务 器 操作 ,主要 变化 集中 在 WM. CREATE Bj E ff Ab 38 38 
辑 上 。 

在 套 接 字 创建 之 后 ,对 套 接 字 地 址 信息 (SOCKADDR_IN) 的 配置 在 服务 器 与 客户 机 端 
是 不 同 的 ,服务 器 不 需要 进行 主机 名 称 解析 ,服务 器 需要 允许 数据 来 自任 意 客户 机 。 其 代码 
如 下 : 


SOCKADDR_IN SockAddr; 
SockAddr.sin port = htons(nPort); 
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SockAddr.sin family= AF INET; 

SockAddr.sin addr.s addr - htonl(INADDR ANY); 

这 段 代码 与 前 面 介绍 的 其 他 类 型 的 套 接 字 服务 器 相同 。 

接 下 来 对 套 接 字 进 行 绑 定 ,并 用 MessageBox() 取 代 控 制 台 模式 下 的 std: :cout 输出 出 
错 信息 。 其 代码 如 下 : 


if(bind(Socket, (LPSOCKADDR) &SockAddr, sizeof(SockAddr)) == SOCKET ERROR) 


MessageBox( hWnd, " £ Hz FHE K Wr", "错误 ", MB OK); 
SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 
i 
如 果 需 要 让 这 个 新 绑 定 的 套 接 字 在 发 生 如 表 2. 5 所 示 的 套 接 字 事 件 时 产生 一 条 消息 ， 
这 个 消息 能 够 通过 Windows 消息 机 制 发 送 到 窗 体 回调 函数 中 进行 处 理 , 这 部 分 代码 与 前 面 
程序 2.9 客户 机 的 编写 相似 ,是 通过 开启 套 接 字 异步 事件 通知 模式 完成 的 。 其 代码 如 下 ; 
nResult = WSAAsyncSelect(Socket, hWnd, WM SOCKET, (FD CLOSE|FD ACCEPT|FD READ)); 
if(nResult) 
( 
MessageBox( hWnd, " NSAAsyncSelect 套 接 字 异步 事件 设 定 失败 ", "严重 错误 ", MB_ICONERROR) ; 
SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 
break; 
) 


此 前 客户 机 编程 时 只 关心 FD. CLOSE fil FD. READ 两 个 事件 ,但 作为 服务 器 编程 , 理 
所 当然 要 关注 FD_ACCEPT 事件 。FD_ACCEPT 事件 表明 有 客户 机 正在 请 求 连接 到 服务 
器 ,程序 员 需 要 在 窗 体 回调 函数 中 予以 处 理 。 

接 下 来 ,服务 器 可 以 开始 侦 听 客户 连接 : 

if(listen(Socket, (1)) == SOCKET ERROR) 

pe————————— S,ya 28; 

SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 

break; 

) 

如 果 前 面 的 步骤 都 能 成 功 执行 , 即 套 接 字 初始 化 成 功 , 套 接 字 绑 定 成 功 , 套 接 字 开启 异 
步 事件 通知 模式 成 功 , 套 接 字 成 功 转 至 侦 听 状态 ,那么 最 后 一 步 就 是 处 理 Windows 消息 。 
在 回调 函数 中 ,对 FD_READ 和 FD. CLOSE 消息 的 处 理 不 再 解释 。 对 于 服务 器 而 言 ,FD_ 
ACCEPT 这 条 消息 很 重要 , 它 决 定 了 客户 机 能 否 成 功 连接 到 服务 器 。FD_ACCEPT 消息 处 
JI? SRI FD. READ 一 样 都 放 在 switch 选择 语句 中 ,其 代码 如 下 : 

switch(WSAGETSELECTEVENT( lParam) ) 


case FD_ACCEPT: 
{ 
int size = sizeof (sockaddr); 
Socket = accept (wParam, &sockAddrClient, &size); 
if (Socket == INVALID_SOCKET) 
{ 


int nret = WSAGetLastError(); 
WSACleanup(); 
return 1; 
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) 
SendMessage(hEditIn,WM SETTEXT, NULL, (LPARAM) "新 客户 机 成 功 连接 到 服务 器 !"); 
} 
break; 
仔细 观察 上 面 accept 函数 的 用 法 ,与 前 面 控 制 台 模式 下 服务 器 端的 accept 函数 编程 很 
像 , 唯 一 不 同 的 是 用 wParam( 事 件 参 数 ) 作为 对 套 接 字 的 引用 。 异 步 套 接 字 服务 器 程序 的 
代码 如 程序 2. 10 所 示 。 
程序 2. 10 异步 套 接 字 服 务 器 完整 代码 


# include <winsock2.h> 
# include < windows.h> 


# pragma comment( lib, "ws2_32. lib") 


# define IDC_EDIT_IN 101 
# define IDC_EDIT_OUT 102 
# define IDC_MAIN_BUTTON 103 
# define WM_SOCKET 104 


int nPort = 5555; 


HWND hEditIn = NULL; 

HWND hEditOut = NULL; 
SOCKET Socket - NULL; 
char szHistory[10000]; 
Sockaddr sockAddrClient; 


LRESULT CALLBACK WinProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); 


int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR lpCmdLine, int nShowCnd) 
{ 

WNDCLASSEX wClass; 

ZeroMemory(&wClass, sizeof (WNDCLASSEX) ) ; 
wClass.cbClsExtra = NULL; 

wClass.cbSize = sizeof(WNDCLASSEX); 

wClass. cbWndExtra = NULL; 

wClass. hbrBackground - (HBRUSH)COLOR WINDOW; 
wClass. hCursor = LoadCursor(NULL, IDC ARROW); 
wClass. hIcon - NULL; 

wClass. hIconSm - NULL; 

wClass. hInstance - hInst; 

wClass. lpfnWndProc = (WNDPROC)WinProc; 
wClass. lpszClassName - "Window Class"; 
wClass. lpszMenuName = NULL; 

wClass. style = CS HREDRAW|CS VREDRAW; 


if(!RegisterClassEx(&wClass)) 
t 
int nResult - GetLastError(); 
MessageBox( NULL, 
" 窗 体 类 注册 失败 ! \r\n 错误 码 :"， 
" 窗 体 类 注册 错误 "， 
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MB ICONERROR); 


HWND hWnd = CreateWindowEx(NULL, 
"Window Class", 
"异步 套 接 字 服 务 器 "， 
WS OVERLAPPEDWINDOW, 
200, 


hInst, 
NULL); 


if(!hWnd) 
{ 
int nResult = GetLastError(); 


MessageBox( NULL, 
"创建 窗 体 失败 \r\n 错误 码 :"， 
" 窗 体 创建 错误 "， 
MB ICONERROR); 
) 
ShowWindow( hWnd, nShowCnd) ; 
MSG nsg; 


ZeroMemory(&nsg, sizeof (MSG) ); 


while(GetMessage(&msg, NULL, 0, 0) ) 
{ 


TranslateMessage(&nsg) ; 


DispatchMessage(&msg) ; 
) 
return 0; 
) 


LRESULT CALLBACK WinProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) 
( 
switch(msg) 
{ 
case WM_COMMAND: 
switch(LOWORD(wParam)) 
{ 
case IDC MAIN BUTTON: 


t 
char szBuffer[1024]; 
ZeroMemory(szBuffer, sizeof(szBuffer)); 


SendMessage(hEditOut, 
WM GETTEXT, 
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sizeof(szBuffer), 
reinterpret cast < LPARAM »(szBuffer)); 


send(Socket, szBuffer, strlen(szBuffer),0); 


SendMessage(hEditOut,WM SETTEXT, NULL, ( LPARAM) 


} 
break; 
break; 
case WM CREATE: 
{ 
ZeroMemory( szHistory, sizeof(szHistory)); 


// 创 建 接收 消息 框 
hEditIn = CreateWindowEx(WS EX CLIENTEDGE, 
"EDIT", 


mm 
, 


WS CHILD|WS VISIBLE|ES MULTILINE| 
ES AUTOVSCROLL|ES AUTOHSCROLL, 
50, 
100, 
400, 
200, 
hWnd, 
(HMENU)IDC EDIT IN, 
GetModuleHandle( NULL), 
NULL); 
if(!hEditIn) 
{ 
MessageBox( hWnd, 
"不 能 创建 接收 消息 框 "， 
"RRR", 
MB_OK|MB_ICONERROR) ; 
} 
HGDIOBJ hfDefault = GetStockObject(DEFAULT GUI FONT); 
SendMessage(hEditIn, 
WM SETFONT, 
(WPARAM)hfDefault, 
MAKELPARAM( FALSE, 0) ) ; 
SendMessage(hEditIn, 
WM SETTEXT, 
NULL, 
(LPARAM) "正在 等 待 客户 机 连接 .…"); 


// 创 建 发 送 消息 框 
hEditOut = CreateWindowEx(WS EX CLIENTEDGE, 
"EDIT", 


WS CHILD|WS VISIBLE|ES MULTILINE| 
ES AUTOVSCROLL|ES AUTOHSCROLL, 
50, 

30, 

400, 
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60, 
hWnd, 
(HMENU)IDC EDIT IN, 
GetModuleHandle(NULL), 
NULL); 
if(!hEditOut) 
t 
MessageBox( hWnd, 
"不 能 创建 发 送 消息 框 "， 
"Bx", 
MB OK|MB ICONERROR); 
} 


SendMessage(hEditOut, 

WM SETFONT, 

(WPARAM) hfDefault, 

MAKELPARAM( FALSE, 0) ) ; 
SendMessage(hEditOut, 

WM SETTEXT, 

NULL, 

(LPARAM) "在 此 处 输入 要 发 送 的 消息 …"); 


// 创 建 发 送 按钮 

HWND hWndButton = CreateWindow( 
"BUTTON", 
"发 送 "， 
WS TABSTOP|WS VISIBLE| 
WS CHILD|BS DEFPUSHBUTTON, 
50, 
310, 
75, 
23, 
hWnd, 
(HMENU) IDC_MAIN_BUTTON, 
GetModuleHandle( NULL), 
NULL); 


SendMessage( hWndButton, 
WM SETFONT, 
(WPARAM) hfDefault, 
MAKELPARAM(FALSE, 0) ) ; 


WSADATA WsaDat; 
int nResult = WSAStartup(MAKEWORD(2, 2) , &WsaDat) ; 
if(nResult!- 0) 
t 
MessageBox( hWnd, 
"WinSock 服务 初始 化 失败 "， 
"FERR", 
MB_ICONERROR) ; 
SendMessage( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 
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Socket = socket (AF_INET, SOCK_STREAM, IPPROTO_TCP) ; 
if(Socket == INVALID SOCKET) 
{ 
MessageBox( hWnd, 
"创建 套 接 字 失 败 "， 
"FERR", 
MB_ICONERROR) ; 
SendMessage( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 


SOCKADDR_IN SockAddr; 

SockAddr.sin port = htons(nPort); 
SockAddr.sin family- AF INET; 

SockAddr.sin addr.s addr = htonl(INADDR ANY); 


if(bind(Socket, (LPSOCKADDR) &SockAddr, sizeof(SockAddr)) == SOCKET ERROR) 


{ 
MessageBox( hWnd, " 套 接 字 绑 定 失败 ", "错误 ", MB OK) ; 
SendMessage( hWnd, WM. DESTROY, NULL, NULL) ; 
break; 

) 


nResult = WSAAsyncSelect(Socket, 
hWnd, 
WM SOCKET, 
(FD CLOSE|FD ACCEPT|FD READ)); 
if(nResult) 
{ 
MessageBox( hWnd, 
"WSAAsyncSelect 套 接 字 异步 事件 初始 化 失败 "， 
"严重 错误 "， 
MB ICONERROR); 
SendMessage( hWnd, WM. DESTROY, NULL, NULL) ; 
break; 


if(listen(Socket, (1)) == SOCKET ERROR) 
t 
MessageBox( hWnd, 
"服务 器 套 接 字 侦 听 失败 !", 
"错误 "， 
MB OK); 
SendMessage( hWnd, WM. DESTROY, NULL, NULL) ; 
break; 


) 
break; 


case WM_DESTROY: 

t 
PostQuitMessage(0); 
shutdown( Socket, SD BOTH); 
closesocket(Socket) ; 
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WSACleanup(); 
return 0; 


) 
break; 


case WM SOCKET: 


{ 
Switch(WSAGETSELECTEVENT( lParam) ) 
f 
case FD_READ: 
{ 


char szIncoming[1024]; 
ZeroMemory( szIncoming, sizeof(szIncoming)); 


int inDataLength = recv(Socket, 
(char * )szIncoming, 
sizeof(szIncoming)/sizeof(szIncoming[0]), 
0); 


strncat(szHistory, szIncoming, inDataLength) ; 
strcat(szHistory, "\r\n"); 


SendMessage( hEditIn, 
WM_SETTEXT, 
sizeof(szIncoming) - 1, 
reinterpret cast < LPARAM»(&szHistory)); 
i 
break; 


case FD_CLOSE: 
{ 
MessageBox( hWnd, 
"客户 机 关闭 了 到 服务 器 的 连接 "， 
"连接 关闭 "， 
MB ICONINFORMATION|MB OK); 
closesocket(Socket) ; 
SendMessage( hWnd, WM DESTROY, NULL, NULL) ; 
) 
break; 


case FD_ACCEPT: 
{ 
int size = sizeof(sockaddr); 
Socket = accept (wParam, &sockAddrClient, &size); 
if (Socket == INVALID SOCKET) 
{ 
int nret = WSAGetLastError(); 


WSACleanup(); 

) 
SendMessage(hEditIn, 
WM SETTEXT, 

NULL, 


(LPARAM) "客户 机 已 经 成 功 连接 到 服务 器 "); 
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break; 


return DefWindowProc( hWnd, msg, wParam, lParam); 
) 


在 VS2010 中 创建 程序 2. 10 的 步骤 与 此 前 的 程序 2. 9 类似 , 故 在 此 不 再 重复 。 图 2. 22 
是 运行 程序 2. 10 的 初始 界面 ,图 2. 23 是 先 启 动 服 务 器 程序 2. 10, 再 启动 客户 机 程序 2. 9 
观察 到 的 界面 ,可 以 看 到 客户 机 已 经 成 功 地 连接 到 服务 器 ,双方 的 界面 均 有 连接 状态 提示 。 
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图 2.22 异步 套 接 字 服 务 器 启动 后 的 界面 图 2.23 异步 套 接 字 客 户 机 与 服务 器 互 发 
消息 前 的 界面 


如 图 2. 23 所 示 ,分 别 在 客户 机 和 服务 器 上 的 文本 框 中 输入 需要 发 往 对 方 的 消息 ,然后 
单 击 各 自 的 “发 送 ”按钮 ,联合 测试 互 发 消息 后 的 运行 界面 如 图 2. 24 所 示 。 


mE. [| m sb RA Ú Px 


E Ems) 
F z: Hi" NON 


2.24 异步 套 接 字 客 户 机 与 服务 器 互 发 消息 后 的 界面 
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2.4.3 服务 器 响应 多 客户 机 的 并 发 访问 


程序 2. 10 所 示 的 服务 器 程序 只 能 响应 处 理 一 个 客户 机 的 访问 ,是 远 远 满足 不 了 实际 需 
要 的 。 当 大 量 的 客户 机 连接 蜂拥 而 至 时 ,服务 器 该 如 何 应 对 ? 接 下 来 ,程序 2. 11 将 对 程 
JF 2. 10 进行 若干 修改 和 扩展 ,服务 器 程序 2. 11 能 够 与 多 客户 机 同时 建立 连接 并 进行 响应 。 
在 程序 2. 11 中 ,首先 要 创建 一 个 ServerSocket 套 接 字 ,并 像 之 前 那样 对 它 进行 地 址 信 
息 配置 。 为 了 应 对 多 客户 机 的 并 发 连接 ,还 要 创建 一 个 Socket[n] 套 接 字数 组 处 理 与 客户 
机 的 通信 。 换 而 言 之 ,在 服务 器 端 对 每 一 个 请 求 连接 的 客户 机 (不 妨 标记 为 客户 机 D 8841 


一 个 服务 器 Socket[i 与 之 连接 。 
另外 ,还 需要 定义 两 个 整 型 常量 nMaxClients 和 nClient。 其 代码 如 下 : 
const int nMaxClients = 3; // 最 大 并 发 连接 数 
int nClient = 0; // 客 户 机 数量 


SOCKET Socket[ nMaxClients - 1]; 
SOCKET ServerSocket = NULL; 


其 中 ,nMaxClients 表示 服务 器 可 以 同时 响应 的 客户 机 连接 的 最 大 数量 。 如 果 
nMaxClients 二 20, 那 么 第 21 个 客户 机 的 连接 请 求 会 被 拒绝 。 
在 绑 定 套 接 字 时 ,用 ServerSocket 取代 之 前 的 Socket, 代 码 如 下 : 


if(bind(ServerSocket, (LPSOCKADDR) &SockAddr, sizeof(SockAddr)) == SOCKET ERROR) 
{ 

MessageBox( hind, " 套 接 字 绑 定 失败 !", "错误 ", MB_OK) ; 

SendMessage( hWnd, WM. DESTROY, NULL, NULL) ; 

break; 
) 


现在 开始 考虑 如 何 处 理 多 客户 机 连接 ,大 前 提 是 判断 客户 机 连接 数量 有 没有 超出 限度 。 
其 代码 如 下 : 


if(nClient < nMaxClients) 
{ 
int size = sizeof(sockaddr); 
Socket[nClient] = accept(wParam, &sockAddrClient, &size); 
if (Socket[nClient] -- INVALID SOCKET) 
t 
int nret - WSAGetLastError(); 
WSACleanup(); 
) 
SendMessage(hEditIn, 
WM_SETTEXT, 


NULL, 
(LPARAM)" 有 新 客户 机 连接 到 服务 器 !"); 
} 
nClient++; 


} 

上 面 这 段 代 码 只 是 初步 的 设计 , 它 有 一 个 不 足 : 如 果 前 面 设 定 nMaxClients=10, J 3 
器 已 经 与 8 个 客户 机 建立 连接 ,其 中 有 4 个 客户 机 完成 任务 断 开 了 连接 ,那么 服务 器 还 能 再 
响应 多 少 个 新 连接 ? 6 个 还 是 两 个 ? 回答 是 令 人 失望 的 ,只 能 是 两 个 ,因为 断 开 连接 的 4 个 
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套 接 字 不 能 再 重复 使 用 。 一 个 改进 办 法 是 每 次 在 有 客户 机 断 开 时 都 增加 nMaxClients 的 
值 ,这 样 可 以 维持 有 足够 的 Sockets 可 用 。 
接 下 来 关注 服务 器 如 何 读 取 多 客户 机 发 送 到 服务 器 的 数据 ,其 代码 如 下 : 


for(int n=0;n<nClient;n++) 
{ 
char szIncoming[1024]; 
ZeroMemory( szIncoming, sizeof( szIncoming) ) ; 


int inDataLength = recv(Socket[n], 
(char * ) szIncoming, 
sizeof(szIncoming)/sizeof(szIncoming[0]), 
0); 


if(inDataLength!- - 1) 

{ 
strncat(szHistory, szIncoming, inDataLength) ; 
strcat(szHistory, Vn") ; 


SendMessage( hEditIn, 
WM SETTEXT, 
sizeof(szIncoming) - 1, 
reinterpret cast < LPARAM» &szHistory)); 
) 
) 


读 取 数 据 与 之 前 一 样 使 用 recv 函数 。 这 里 用 了 一 个 for 循环 扫描 所 有 的 SocketLnj], 如 
果 被 检测 的 Socket[n] 没 有 数据 可 读 ,recv() 函数 返 回 一 1, 不 做 任何 处 理 接着 跳 到 下 一 个 
Socket[n] 读 取 。 在 实践 中 为 了 能 够 负载 多 人 在 线 , 上 述 程序 还 可 以 继续 优化 。 

为 了 不 使 本 例 程 序 过 于 庞大 ,服务 器 向 所 有 客户 机 发 送 数据 的 代码 用 一 个 循环 来 实现 ， 
其 代码 如 下 ; 

char szBuffer[1024]; 

ZeroMemory(szBuffer, sizeof(szBuffer)); 


SendMessage(hEditOut, 
WM GETTEXT, 
sizeof(szBuffer), 
reinterpret cast < LPARAM >( szBuffer) ) ; 
for(int n= 0;n<nClient;n++) 
{ 
send(Socket[n], szBuffer, strlen(szBuffer),0); 
) 
SendMessage(hEditOut, WM SETTEXT, NULL, (LPARAM) "") ; 


在 实践 中 如 果 想 应 对 10 000 个 并 发 连接 ,就 要 想 办 法 让 服务 器 充分 利用 每 个 时 钟 周期 
和 所 有 的 带宽 ,例如 可 以 考虑 用 多 线程 的 方法 继续 优化 程序 。 尽 管 如 此 ,对 于 上 面 用 循环 实 
现 的 多 客户 机 并 发 数据 通信 ,在 局 域 网 的 80 台 计 算 机 上 进行 模拟 测试 没有 任何 迟滞 的 感 
觉 。 服 务 器 响应 多 客户 机 并 发 访问 的 完整 代码 如 程序 2. 11 所 示 。 

程序 2.11 服务 器 响应 多 客户 机 的 并 发 访问 完整 代码 


* include < winsock2.h> 
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# include < windows. h> 


# pragma comment(lib,"ws2 32.1lib") 


# define IDC EDIT IN 101 
# define IDC EDIT OUT 102 
# define IDC MAIN BUTTON 103 
# define WM SOCKET 104 


int nPort = 5555; 


HWND hEditIn - NULL; 

HWND hEditOut = NULL; 
char szHistory[10000]; 
sockaddr sockAddrClient; 


const int nMaxClients - 3; 

int nClient - 0; 

SOCKET Socket[nMaxClients - 1]; 
SOCKET ServerSocket - NULL; 


LRESULT CALLBACK WinProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); 


int WINAPI WinMain(HINSTANCE hInst,HINSTANCE hPrevInst, LPSTR lpCmdLine, int nShowCmd) 
{ 

WNDCLASSEX wClass; 

ZeroMemory( &wC1ass, sizeof (WNDCLASSEX) ) ; 
wClass.cbClsExtra = NULL; 

wClass. cbSize = sizeof(WNDCLASSEX); 
wClass.cbWndExtra = NULL; 

wClass. hbrBackground - (HBRUSH)COLOR WINDOW; 
wClass. hCursor = LoadCursor(NULL, IDC ARROW); 
wClass. hIcon - NULL; 

wClass. hIconSm - NULL; 

wClass. hInstance - hInst; 

wClass. lpfnWndProc = (WNDPROC)WinProc; 
wClass. lpszClassName = "Window Class"; 
wClass. lpszMenuName = NULL; 

wClass. style = CS HREDRAW|CS VREDRAW; 


if(!RegisterClassEx(&wClass)) 
( 
int nResult = GetLastError(); 
MessageBox( NULL, 
" 窗 体 类 注册 失败 \r\n 错误 码 :"， 
" 窗 体 类 错误 "， 
MB ICONERROR); 


HWND hiind = CreateWindowEx(NULL, 
"Window Class", 
"异步 套 接 字 服务 器 (多 客户 机 并 发 访问 )"， 
WS OVERLAPPEDWINDOW, 
200, 
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hInst, 
NULL); 


if(!hWnd) 
( 
int nResult - GetLastError(); 


MessageBox( NULL, 
"创建 窗 体 失败 \r\n 错误 码 :"， 
" 窗 体 错误 "， 
MB ICONERROR); 
) 
ShowWindow( hWnd, nShowCnd) ; 
MSG msg; 


ZeroMemory(&nsg, sizeof(MSG)) ; 


while(GetMessage(&msg, NULL, 0, 0) ) 
{ 


TranslateMessage(&nsg) ; 
DispatchMessage(&nmsg) ; 
) 
return 0; 
) 


LRESULT CALLBACK WinProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM 1Param) 
{ 
switch(msg) 
{ 
case WM_COMMAND: 
switch(LOWORD(wParam) ) 
1 
case IDC MAIN BUTTON: 
t 
char szBuffer[1024]; 
ZeroMenory(szBuffer, sizeof (szBuffer)); 


SendMessage(hEditOut, 

WM GETTEXT, 

sizeof(szBuffer), 

reinterpret cast < LPARAM »(szBuffer)); 
for(int n= 0;n«nClient;n**) 
{ 

send(Socket[n], szBuffer, strlen(szBuffer),0); 
) 


SendMessage(hEditOut,WM SETTEXT, NULL, (LPARAM)"") ; 
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break; 
case WM_CREATE: 
t 


ZeroMemory(szHistory, sizeof(szHistory)); 


// 创 建 接收 消息 框 
hEditIn = CreateWindowEx(WS EX CLIENTEDGE, 
"EDIT", 


mm 


WS CHILD|WS VISIBLE|ES MULTILINE| 
ES AUTOVSCROLL|ES AUTOHSCROLL, 
50, 
100, 
400, 
200, 
hWnd, 
(HMENU)IDC EDIT IN, 
GetModuleHandle(NULL), 
NULL); 
if(!hEditIn) 
{ 
MessageBox( hWnd, 
"创建 接收 消息 框 失败 "， 
"RRR", 
MB_OK|MB_ICONERROR) ; 
} 
HGDIOBJ hfDefault = GetStockObject(DEFAULT GUI FONT); 
SendMessage(hEditIn, 
WM SETFONT, 
(WPARAM) h£Default, 
MAKELPARAM(FALSE, 0) ) ; 
SendMessage(hEditIn, 
WM SETTEXT, 
NULL, 
(LPARAM) "正在 等 待 客户 机 并 发 连接 .…"); 


// 创 建 发 送 消息 框 
hEditOut = CreateWindowEx(WS_EX_CLIENTEDGE, 
"EDIT", 


WS CHILD|WS VISIBLE|ES MULTILINE| 
ES AUTOVSCROLL|ES AUTOHSCROLL, 
50, 
30, 
400, 
60, 
hWnd, 
(HMENU)IDC EDIT IN, 
GetModuleHandle(NULL), 
NULL); 
if(!hEditOut) 
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MessageBox( hWnd, 
"创建 发 送 消息 框 失败 "， 
"i, 
MB OK|MB ICONERROR); 
) 


SendMessage( hEditOut, 

WM SETFONT, 

(WPARAM) hfDefault, 

MAKELPARAM( FALSE, 0) ) ; 
SendMessage(hEditOut, 

WM SETTEXT, 

NULL, 

(LPARAM) "输入 要 发 送 的 消息 …”) 


// 创 建 发 送 按钮 

HWND hWndButton = CreateWindow( 
"BUTTON", 
"发 送 "， 
WS TABSTOP|WS VISIBLE| 
WS CHILD|BS DEFPUSHBUTTON, 
50, 
330, 
75, 
23, 
hWnd, 
(HMENU)IDC MAIN BUTTON, 
GetModuleHandle(NULL), 
NULL); 


SendMessage( hWndButton, 
WM SETFONT, 
(WPARAM) hfDefault, 
MAKELPARAM(FALSE, 0) ) ; 


WSADATA WsaDat; 
int nResult = WSAStartup(MAKENORD(2, 2) , SNsaDat) ; 
if(nResult!- 0) 
{ 
MessageBox( hWnd, 
"WinSock 服务 初始 化 失败 "， 
"严重 错误 "， 
MB_ICONERROR) ; 
SendMessage( hWnd, WM DESTROY, NULL, NULL) ; 
break; 
) 


ServerSocket = socket(AF INET,SOCK STREAM, IPPROTO TCP); 
if(ServerSocket -- INVALID SOCKET) 
t 
MessageBox( hWnd, 
"创建 套 接 字 失败 "， 
"FERR", 
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MB ICONERROR); 
SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 
break; 


SOCKADDR IN SockAddr; 

SockAddr.sin port = htons(nPort); 
SockAddr.sin family = AF INET; 

Sockhddr.sin addr.s addr- htonl(INADDR ANY); 


if(bind(ServerSocket, (LPSOCKADDR) &SockAddr, sizeof(SockAddr)) == SOCKET ERROR) 
t 

MessageBox( hlind, " 套 接 字 绑 定 失败 "， "错误 ",MB_OK) ; 

SendMessage(hWnd, WM DESTROY, NULL, NULL) ; 

break; 


nResult = WSAAsyncSelect(ServerSocket, 
hWnd, 
WM_SOCKET, 
(FD CLOSE|FD ACCEPT|FD READ)); 
if(nResult) 
( 
MessageBox( hWnd, 
"WSAAsyncSelect 异步 套件 字 事件 模式 失败 "， 
"FERR", 
MB_ICONERROR) ; 
SendMessage( hWnd, WM_DESTROY, NULL, NULL) ; 
break; 


if(listen(ServerSocket, SOMAXCONN) == SOCKET_ERROR) 
{ 
MessageBox( hWnd, 
"服务 器 侦 听 失败 "， 
"错误 "， 
MB_OK); 
SendMessage( hWnd, WM DESTROY, NULL, NULL) ; 
break; 


) 
break; 


case WM DESTROY: 

{ 
PostQuitMessage(0); 
shutdown(ServerSocket, SD BOTH); 
closesocket(ServerSocket) ; 
WSACleanup(); 
return 0; 


break; 
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Switch(WSAGETSELECTEVENT( lParam) ) 
{ 
case FD READ: 
t 
for(int n- 0;n«nClient;n**) 
| 
char szIncoming[1024]; 
ZeroMemory(szIncoming, sizeof(szIncoming)); 


int inDataLength - recv(Socket[n], 
(char * ) szIncoming, 
sizeof(szIncoming)/sizeof(szIncoming[0]), 
0); 


if(inDataLength!- — 1) 


{ 
strncat(szHistory, szIncoming, inDataLength) ; 
strcat(szHistory, Arn"); 
SendMessage( hEditIn, 
WM SETTEXT, 
sizeof(szIncoming) - 1, 
reinterpret cast < LPARAM»(&szHistory)); 
) 
) 
) 
break; 
case FD CLOSE: 
t 
MessageBox( hWnd, 
"有 一 个 客户 机 关闭 了 连接 "， 
"连接 关闭 "， 
MB ICONINFORMATION|MB OK); 
) 
break; 


case FD_ACCEPT: 
{ 
if(nClient < nMaxClients) 


( 
int size = sizeof(sockaddr); 
Socket[nClient] = accept(wParam, &sockAddrClient, &size); 
if (Socket[nClient] -- INVALID SOCKET) 
{ 
int nret = WSAGetLastError(); 
WSACleanup(); 
return 1; 
} 
SendMessage( hEditIn, 
WM_SETTEXT, 
NULL, 
(LPARAM) "有 一 个 新 客户 机 连接 到 服务 器 !"); 
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) 


nClient++; 


break; 


return DefWindowProc(hWnd, msg, wParam, lParam); 


i 

对 于 在 VS2010 中 创建 程序 2. 11 的 步骤 在 此 不 再 袭 述 。 程 序 2. 11 启动 后 的 初始 运行 
界面 如 图 2. 25 所 示 ,与 程序 2. 10 的 初始 运行 界面 相 比 , 只 有 标题 栏 不 同 。 但 读者 不 要 被 表 
象 所 迷惑 ,因为 两 者 在 程序 内 核 上 是 大 相 径 庭 的 。 请 读者 在 局 域 网 中 联合 客户 机 程序 2.9 
进行 多 点 测试 ,观察 程序 的 性 能 。 


m 异步 套 接 字 服务 器 (多 客户 机 并 发 . . . EDOR 
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图 2.25 服务 器 响应 客户 机 群 并 发 访问 初始 界面 


8.5 WinSock2 1/0 模型 编程 


为 了 适应 不 同 网 络 通信 规模 的 需要 , WinSock2 定义 了 6 种 1/0 模型 , 即 Blocking 1/0 
(EH 3E 1/0) select I/O( 选 择 1/0) , WSAAsyncSelect IO( 异 步 选 择 I/O) , WSAEventSelect 
1/O( 事 件 选择 1/O)、Overlapped I/OGE £ I/O) MK I/O Completion PortCI/O 完成 端口 ) 。 


2.5.1 Blocking 1/0 模型 


大 多 数 WinSock 程序 员 都 会 从 Blocking L/O 模型 开始 学 习 , 因 为 它 是 最 简单 .最 直接 
的 通信 模型 ,前面 已 经 用 多 个 实例 证 明了 这 一 点 。 使 用 这 个 模型 的 应 用 程序 比较 简单 ,一 般 
针对 每 个 套 接 字 连 接 只 开设 一 到 两 个 线程 处 理 读 写 ,每 个 线程 执行 send OI recv() 时 都 可 
EREM., Blocking 1/0 模型 的 最 大 优点 就 是 简单 ,对 于 非常 简单 的 应 用 和 快速 原型 编 
程 ,这 种 模型 是 非常 有 用 的 ; 缺点 是 并 发 连接 增多 时 需要 创建 更 多 的 线程 ,增加 了 系统 资源 
的 消耗 。 
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程序 2. 5 和 程序 2. 6 演示 了 阻塞 模式 的 套 接 字 编 程 。 下 面 再 给 出 一 个 阻塞 模式 的 客户 
机 程序 TcpClient, 这 个 程序 一 方面 总 结 了 Blocking 1/0 模型 的 编程 要 点 , 另 一 方面 加 入 了 
若干 控制 参数 ,适合 作为 客户 机 测试 本 节 后 面 介 绍 的 其 他 I/O 模型 。 

TepClient 程序 的 命令 行 中 包括 4 个 参数 ,分 别 是 目标 服务 器 端口 .主机 名 或 IP 地 址 、 
发 送 消息 的 次 数 以 及 是 否 接收 服务 器 的 回 送 数据 ,这 大 大 增加 了 客户 机 的 灵活 性 。 
TepClient 客户 机 程序 的 完整 代码 如 程序 2. 12 Bron o 

程序 2.12. TepClient 客户 机 程序 完整 代码 


UE 

// 连接 TCP Server, 发 送 数据 ,接收 服务 器 回 送 的 数据 
// ”命令 行 参数 : 

// client [-p:x] [-s:IP] [7-n:x] [- 0] 

// = 目标 服务 器 端口 

/ 一 s:IP 主机 名 或 IP 地 址 

// -nux 发 送 消息 的 次 数 

// = 只 发 送 ,不 接收 

/ 


# include < winsock2. h> 

# include < stdio. h> 

# include < stdlib.h» 

* pragma comment(lib,"ws2 32.1ib") 


# define DEFAULT COUNT 20 

# define DEFAULT PORT 5150 

# define DEFAULT BUFFER 2048 

f define DEFAULT MESSAGE "V'A test message from clientV'" 


char szServer[128], // 服 务 器 主机 名 或 地 址 
szMessage[1024]; // 发 送 到 服务 器 的 消息 缓冲 区 

int iPort- DEFAULT PORT; // 服 务 器 端口 

DWORD dwCount = DEFAULT COUNT; // 发 送 消息 的 次 数 

BOOL bSendOnly = FALSE; // 为 True 时 只 发 送 ,不 接收 

// 函 数 用 法 说 明 

void usage() 


{ 
printf("TcpClient: client [—p:x] [ - s:IP] [ - n:x] [ -ol]\n\n"); 
printf(" —p:x Remote port to send toin") ; 
printf(" — s:IP Server's IP address or hostnaneWn") ; 
printf("—-n:x Number of times to send message") ; 
printf("- o Send messages only; don't receive"); 
printf("Wn"); 

) 


// 命 令 行 参 数 解析 
void ValidateArgs(int argc, char * * argv) 
t 
int i; 
for(i = 1; i« argc; i++) 
t 
if ((argv[i][0] == '-') || (argv[il[0] == '/')) 
{ 
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Switch (tolower(argv[i][1])) 


{ 
case 'p': // 目 标 服 务 器 端口 
if (strlen(argv[i]) > 3) 
iPort - atoi(&argv[i][3]); 
break; 
case 's': // 服 务 器 主机 名 
if (strlen(argv[i]) > 3) 
strcpy s(szServer, sizeof(szServer),&argv[i][3]); 
break; 
case 'n': // 发 送 消息 的 次 数 
if (strlen(argv[i]) > 3) 
dwCount = atol(&argv[i][3]); 
break; 
case 'o': // 只 发 送 ,不 接收 
bSendOnly = TRUE; 
break; 
default: 
usage() ; 
break; 
) 
i 
F 
} 
// 主 函数 : main 


// 初 始 化 WinSock, 分 析 命 令 行 参 数 ,创建 套 接 字 , 连接 服务 器 , 发 送 和 接收 数据 
int main(int argc, char ** argv) 
{ 

WSADATA wsd; 

SOCKET sClient; 

char szBuffer[DEFAULT BUFFER]; 

int ret, i; 

struct sockaddr in server; 

struct hostent  * host - NULL; 


if(argc < 2) 
{ 
usage() ; 
exit(1); 
) 


// 分 析 命令 行 参数 ,加 载 WinSock 

ValidateArgs(argc, argv); 

if (WSAStartup(MAKEWORD(2,2), &wsd) != 0) 

{ 
printf("Failed to load Winsock library! Error % dn", WSAGetLastError()); 
return 1; 


) 


else 
printf("Winsock library loaded successfully! Vn"); 


strcpy s(szMessage, sizeof(szMessage),DEFAULT MESSAGE); 
// 创 建 套 接 字 ,连接 服务 器 
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sClient = socket(AF INET, SOCK STREAM, IPPROTO TCP); 
if (sClient -- INVALID SOCKET) 


{ 
printf("socket() failed with error code % d\n", WSAGetLastError()); 
return 1; 

} 

else 


printf("socket() looks fine! n"); 


server. sin family = AF INET; 
Server.sin port = htons(iPort); 
server.sin addr.s addr = inet addr(szServer); 


// 如 果 服 务 器 地 址 不 是 "aaa. bbb. ccc. ddd" 的 形式 就 是 主机 名 ,需要 解析 
if (server.sin addr.s addr == INADDR NONE) 
{ 
host = gethostbyname(szServer); 
if (host -- NULL) 
{ 
printf("Unable to resolve server % s\n", szServer); 
return 1; 


else 
printf("The hostname resolved successfully! Wn"); 


CopyMemory(&server.sin addr, host-» h addr list[0], host -> h length); 


if (connect(sClient, (struct sockaddr * )&server, sizeof(server)) -- SOCKET ERROR) 
{ 
printf("connect() failed with error code % din", WSAGetLastError()); 
return 1; 
} 
else 
printf("connect() is pretty damn fine! Wn"); 


// 发 送 和 接收 数据 
printf("Sending and receiving data if any...\n"); 


for(i = 0; i< (int)dwCount; i++) 
{ 
ret = send(sClient, szMessage, strlen(szMessage), 0); 
if (ret == 0) 
break; 
else if (ret -- SOCKET ERROR) 
{ 
printf("send() failed with error code % d\n", WSAGetLastError()); 
break; 
I 
printf("send() should be fine. Send % d bytes\n", ret); 
if (!bSendOnly) 
t 
ret - recv(sClient, szBuffer, DEFAULT BUFFER, 0); 
if (ret -- 0) // 正 常 关 闭 
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{ 
printf("It is a graceful close! Wn"); 
break; 
) 
else if (ret -- SOCKET ERROR) 
{ 
printf("recv() failed with error code * din", WSAGetLastError()); 
break; 
) 


szBuffer[ret] = '\0'; 
printf("recv() is OK. Received % d bytes: $% s\n", ret, szBuffer); 


} 


if(closesocket(sClient) == 0) 
printf("closesocket() is OK! Wn"); 
else 
printf("closesocket() failed with error code % d\n", WSAGetLastError()); 


if (WSACleanup() == 0) 
printf("WSACleanup() is fine! n"); 
else 
printf("WSACleanup() failed with error code * din", WSAGetLastError()); 


return 0; 


) 

编译 运行 程序 2. 12 ,输出 结果 如 图 2.26 所 示 ,其 
给 出 了 TepClient 命令 行 的 参数 ,后 面 将 用 这 个 程序 
作为 客户 机 对 其 他 L/O 模型 服务 器 进行 测试 。 


图 2.26 TcpClient 客户 机 程序 命令 行 
2.5.2 select /O 模型 参数 用 法 


select I/O 模型 是 在 WinSock 编程 实践 中 广泛 应 用 的 一 个 模型 ,之 所 以 称 其 为 select I/O 
模型 ,是 因为 它 用 select KAH I/O. select 函数 原来 是 基于 Berkeley Socket 实现 的 ,用 
在 UNIX FRE. WHE. select 函数 被 纳入 WinSock1. 1 规范 ,用 来 管理 套 接 字 的 阻塞 问题 。 
例如 ,select 函数 可 以 判断 套 接 字 上 是 否 存在 数据 可 读 , 或 者 能 否 向 一 个 套 接 字 写 入 数据 。 


1. select 函数 


int select( 
.In int nfds, 
.Inout fd set * readfds, 
.Inout fd set * writefds, 
.Inout fd set * exceptfds, 
.In const struct timeval * timeout 


); 
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该 函数 的 功能 是 确定 一 个 或 多 个 套 接 字 的 就 绪 状 态 。 该 函数 执行 后 ,将 返回 包含 在 
fd_set 结构 中 的 已 经 就 绪 的 套 接 字 数量 , 如 果 超 时 则 返回 0, 如 果 发 生 错 误 则 返回 SOCKET_ 
ERROR 错误 码 。 

其 参数 的 含义 如 下 。 

* nfds: 为 了 与 Berkeley 套 接 字 兼容 而 保留 的 ,可 以 忽略 。 

* readfds: 用 于 检查 可 读 性 的 套 接 字 集合 。 

。 writefds: 用 户 检查 可 写 性 的 套 接 字 集 合 。 

。 exceptfds: 用 于 表示 带 外 数据 的 套 接 字 集合 。 

readfds、writefds 和 exceptfds 3 个 参数 都 是 fd_set 结构 类 型 ,fd_set 用 于 表示 select PR 
数 监视 的 套 接 字 集合 。 

最 后 一 个 参数 timeout 是 一 个 指向 timeval 结构 的 指针 ,表示 select() 函 数 等 待 1/O 完 
成 的 超时 间隔 。 如 果 timeout 为 空 ,select() 将 无 限期 等 待 (阻塞 ) ,直到 至 少 有 一 个 套 接 字 
满足 设 定 的 条 件 为 止 。timeval 结构 的 定义 如 下 : 

struct timeval 

i long tv_sec; 

long tv_usec; 

}; 

其 中 ,tv_sec 域 表示 等 待 的 秒 数 ,tv_usec 域 表示 等 待 的 毫秒 数 。 如 果 超 时 时 间 为 {0,0) , 表 
示 select() 函 数 将 立即 返回 。 

WinSock 提供 了 下 列 宏 命令 对 fd set 集合 进行 操作 。 

* FD ZERO( * set); 初始 化 集合 为 空 集 。 

* FD CLR(s. * set): 从 集合 中 删除 一 个 套 接 字 s. 

* FD ISSET(s. x set): 检查 套 接 字 s 是 否 是 集合 中 的 成 员 ,如 果 是 则 返回 TRUE, 

* FD SET(s, * set): HERF s 加 入 集合 。 


2. select MO 服务 器 编程 实例 


下 面 给 出 的 5 个 步骤 描述 了 在 应 用 程序 中 使 用 select 模型 编程 的 基本 要 点 : 

(1) 使 用 FD_ZERO 宏 命 令 初始 化 所 有 的 fd sec 集合 。 

(2) 使 用 FD_SET 宏 命 令 将 套 接 字 加 入 相应 的 fd_set 集合 。 

(3) 调用 select O 函数 监视 fd. set 集合 中 的 套 接 字 的 1/0 活动 ,select() 函 数 完成 时 返 
回 各 fd_set 集合 中 套 接 字 的 句柄 总 数 并 更 新 各 fd_set 集合 。 

(4) 根据 select() 函 数 的 返回 值 ,应 用 程序 使 用 FD_ISSET 宏 命令 检查 所 有 的 fd set 
集合 ,进而 判断 哪个 套 接 字 有 1/0 正在 等 待 处 理 。 

(5) 执行 /O 操作 ,然后 转 到 第 (1) 步 继续 select 选择 过 程 。 

程序 2. 13 演示 了 如 何 基 于 select 1/0 模型 创建 一 个 回 送 服务 器 ,服务 器 在 5150 端口 
上 侦 听 TCP 连接 ,并 将 收 到 的 客户 机 数据 回 送 客户 机 。 

程序 2. 13 select I/O 模型 回 送 服务 器 完整 代码 


//select I/0 模 型 回 送 服务 器 
//select. cpp 
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# include < winsock2.h» 
# include < windows. h> 
# include < stdio. h> 


# pragma comment( lib, "ws2_32. lib") 


# define PORT 5150 
# define DATA_BUFSIZE 8192 


typedef struct _SOCKET_INFORMATION { 
CHAR Buffer[DATA BUFSIZE]; 
WSABUF DataBuf; 
SOCKET Socket; 
OVERLAPPED Overlapped; 
DWORD BytesSEND; 
DWORD BytesRECV; 
} SOCKET INFORMATION, * LPSOCKET INFORMATION; 


// 原 型 
BOOL CreateSocketInformation(SOCKET s); 
void FreeSocketInformation(DWORD Index); 


// 全 局 变量 
DWORD TotalSockets = 0; 
LPSOCKET INFORMATION SocketArray[FD SETSIZE]; 


int main(int argc, char * * argv) 
{ 
SOCKET ListenSocket; 
SOCKET AcceptSocket; 
SOCKADDR_IN InternetAddr; 
WSADATA wsaData; 
INT Ret; 
FD SET WriteSet; 
FD SET ReadSet; 
DWORD i; 
DWORD Total; 
ULONG NonBlock; 
DWORD Flags; 
DWORD SendBytes; 
DWORD RecvBytes; 


if ((Ret = WSAStartup(0x0202,&wsaData)) !- 0) 

{ 
printf("WSAStartup() failed with error % d\n", Ret); 
WSACleanup(); 
return 1; 


) 


else 
printf("WSAStartup() is fine! n"); 


// 创 建 用 于 侦 听 的 套 接 字 
if ((ListenSocket = WSASocket(AF INET, SOCK STREAM, 0, NULL, 0, 
WSA FLAG OVERLAPPED)) -- INVALID SOCKET) 
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printf("WSASocket() failed with error * d\n", WSAGetLastError()); 
return 1; 

) 

else 
printf("WSASocket() is OK! Vn") ; 


InternetAddr.sin family - AF INET; 
InternetAddr.sin addr.s addr - htonl(INADDR ANY); 
InternetAddr.sin port - htons(PORT); 


if (bind(ListenSocket, (PSOCKADDR) &InternetAddr, sizeof(InternetAddr)) -- SOCKET ERROR) 
{ 
printf("bind() failed with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("bind() is OK! Vn"); 


if (listen(ListenSocket, 5)) 

{ 
printf("listen() failed with error % d\n", WSAGetlastError()); 
return 1; 

) 

else 
printf("listen() is OK! Vn"); 


// 将 侦 听 套 接 字 的 阻塞 模式 转 为 非 阻塞 模式 , 这 样 服务 器 在 等 待 连接 到 达 期 间 不 会 发 生 阻 塞 
NonBlock = 1; 
if (ioctlsocket(ListenSocket, FIONBIO, &NonBlock) -- SOCKET ERROR) 
{ 
printf("ioctlsocket() failed with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("ioctlsocket() is OK! An") ; 


while(TRUE) 

{ 
// 初 始 化 等 待 网 络 1/0 事件 通知 的 读 / 写 套 接 字 集合 
FD_ZERO(&ReadSet) ; 
FD_ZERO(&WriteSet); 


// 将 侦 听 套 接 字 加 入 套 接 字 读 集合 
FD SET(ListenSocket, &ReadSet); 


// 基 于 当前 状态 缓冲 区 为 每 个 套 接 字 设 置 读 / 写 
// 如 果 缓 冲 区 中 有 数据 将 其 写 人 集合 ,否则 读 集 
for (i = 0; i< TotalSockets; i++) 
if (SocketArray[i] -> BytesRECV > SocketArray[i] 一 > BytesSEND) 
FD_SET(SocketArray[ i] 一 > Socket, &WriteSet); 
else 
FD_SET(SocketArray[ i] -> Socket, &ReadSet); 


95 


Ë` 


96, Windows 网 络 编程 案例 教程 


`. 


if ((Total = select(0, &ReadSet, &WriteSet, NULL, NULL)) == SOCKET ERROR) 
t 
printf("select() returned with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("select() is OK! Vn") ; 


// 检 查 到 达 的 连接 在 侦 听 套 接 字 
if (FD ISSET(ListenSocket, &ReadSet)) 
{ 
Total =- į 
if ((AcceptSocket = accept(ListenSocket, NULL, NULL)) != INVALID_SOCKET) 
{ 
// 设 置 套 接 字 AcceptSocket 为 非 阻 塞 模式 
// 这 样 服务 器 在 调用 WSASends 发 送 数据 时 就 不 会 被 阻塞 
NonBlock = 1; 
if (ioctlsocket(AcceptSocket, FIONBIO, &NonBlock) == SOCKET ERROR) 
1 
printf("ioctlsocket(FIONBIO) failed with error % d\n", WSAGetLastError()); 
return 1; 
} 
else 
printf("ioctlsocket(FIONBIO) is OK!\n"); 


if (CreateSocketInformation(AcceptSocket) -- FALSE) 

q 
printf("CreateSocketInformation(AcceptSocket) failed! Wn"); 
return 1; 

) 

else 
printf("CreateSocketInformation() is OK! Wn"); 

) 


else 
{ 
if (WSAGetLastError() != WSAEWOULDBLOCK) 
I 
printf("accept() failed with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 


printf("accept() is fine! Vn"); 
) 
) 
// 依 次 处 理 所 有 的 套 接 字 , SocketInfo 为 当前 要 处 理 的 套 接 字 信息 
for (i = 0; Total» 0 && i < TotalSockets; i++) 
{ 
LPSOCKET INFORMATION SocketInfo = SocketArray[i]; 


// 判 断 当前 套 接 字 的 可 读 性 , 即 是 否 有 接 人 的 连接 请 求 或 者 可 以 接收 数据 
if (FD ISSET(SocketInfo -» Socket, &ReadSet)) 


{ 
Total-- ; 
SocketInfo -> DataBuf.buf = SocketInfo-» Buffer; 
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SocketInfo -> DataBuf. len = DATA BUFSIZE; 
Flags = 0; 
if (WSARecv(SocketInfo -> Socket, &(SocketInfo- DataBuf), 1, &RecvBytes, 
&Flags, NULL, NULL) -- SOCKET ERROR) 
t 
if (WSAGetLastError() !- WSAEWOULDBLOCK) 
{ 
printf("WSARecv() failed with error $ din", WSAGetLastError()); 
FreeSocketInformation(i); 
) 
else 
printf("WSARecv() is OK! Vn") ; 


continue; 
) 
else 
t 
SocketInfo -> BytesRECV = RecvBytes; 


// 如 果 接 收 到 0 个 字 节 , 则 表示 对 方 关闭 连接 
if (RecvBytes == 0) 
{ 
FreeSocketInformation(i); 
continue; 
) 
) 
} 
// 如 果 当 前 套 接 字 在 WriteSet 集合 中 
// 则 表明 该 套 接 字 的 内 部 数据 缓冲 区 中 有 数据 可 以 发 送 
if (FD_ISSET(SocketInfo— > Socket, &WriteSet)) 
t 
Total -- ; 
SocketInfo -> DataBuf.buf = SocketInfo -> Buffer + SocketInfo 一 > BytesSEND; 
SocketInfo -> DataBuf.len = SocketInfo -> BytesRECV - SocketInfo - > BytesSEND; 
if (WSASend(SocketInfo—> Socket, &(SocketInfo- » DataBuf), 1, &SendBytes, 0, 
NULL, NULL) -- SOCKET ERROR) 
t 
if (WSAGetLastError() !- WSAEWOULDBLOCK) 
{ 
printf("WSASend() failed with error % din", WSAGetLastError()); 
FreeSocketInformation(i); 
) 
else 
printf("WSASend() is OK! n"); 
continue; 
} 
else 
{ 
SocketInfo 一 > BYtesSEND + = SendBytes; 
if (SocketInfo -> BytesSEND == SocketInfo- > BytesRECV) 
{ 
SocketInfo—> BytesSEND = 
SocketInfo 一 > BytesRECV = 


0; 
0 
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BOOL CreateSocketInformation(SOCKET s) 


{ 
LPSOCKET INFORMATION SI; 


printf("Accepted socket number % d\n", s); 


if ((SI = (LPSOCKET INFORMATION) GlobalAlloc(GPTR, sizeof(SOCKET INFORMATION))) -- NULL) 
{ 

printf("GlobalAlloc() failed with error % d\n", GetLastError()); 

return FALSE; 
) 


else 
printf("GlobalAlloc() for SOCKET INFORMATION is OK! An"); 


// 初 始 化 SI 的 值 
SI-»Socket = s; 
SI-»BytesSEND = 0 
SI-»BytesRECV = 0; 
SocketArray[TotalSockets] - SI; 
TotalSockets++ ; 

return(TRUE); 


void FreeSocketInformation(DWORD Index) 


{ 
LPSOCKET INFORMATION SI = SocketArray[ Index]; 
DWORD i; 


closesocket(SI -> Socket); 

printf("Closing socket number % d\n", SI- > Socket); 
GlobalFree(SI); 

// 调 整 SocketArray 的 位 置 ,填补 队列 中 的 空缺 

for (i = Index; i < TotalSockets; i++) 


{ 
SocketArray[i] = SocketArray[i + 1]; 


TotalSockets ——; 
} 


编译 运行 程序 2. 13 ,测试 步骤 如 下 : 
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(1) 服务 器 运行 初始 界面 如 图 2. 27 所 示 , 图 中 给 
出 了 服务 器 关键 步骤 的 运行 状态 。 

(2) 启动 客户 机 程序 TcpClient, 执 行 以 下 命令 : 

TcpClient - p:5150 - s:localhost - n:2 

TepClient 连接 服务 器 后 ,客户 机 运行 界面 如 图 2. 28 图 2.27 select 回 送 服务 器 初始 界面 
所 示 ,显示 了 与 服务 器 的 交互 过 程 。 

(3) 观察 select 服务 器 的 响应 情况 ,界面 如 图 2.29 所 示 。 再 试 一 试 客 户 机 的 其 他 命令 
方式 ,例如 增 大 第 3 个 数值 , 即 消息 的 发 送 次 数 ,观察 服务 器 的 反应 并 做 出 分 析 。 


图 2.28 TcpClient 客户 机 连接 select 服务 器 后 的 界面 图 2. 29 select 服务 器 的 反馈 界面 


select() 1/0 模型 的 优势 是 在 一 个 线程 中 能 够 处 理 多 个 套 接 字 的 T/O 操作 ,可 以 防止 
阻塞 模式 下 多 套 接 字 和 多 重 连 接 带 来 的 线程 剧 增 问 题 。 其 不 利 的 方面 是 ,fd_set 默认 可 以 
容纳 的 最 大 套 接 字数 是 FD_SETSIZE, 而 FD_SETSIZE 在 winsock2. h 中 被 定义 为 64。 为 
了 突破 这 个 限制 ,在 程序 中 可 以 将 FD_SETSIZE 定义 得 大 一 些 , 但 定义 的 位 置 应 该 在 
winsock2.h 文件 之 前 。 

注意 : WinSock2 底层 对 fd_set 集合 的 大 小 支持 最 大 为 1024, 但 并 不 保证 这 一 数字 总 
是 有 效 。 


2.5.3 WSAAsyncSelect 1/0 模型 


WSAAsyncSelect 1/0 模型 是 WinSock2 基于 Windows 消息 机 制 实现 的 异步 事件 通知 
I/O 模型 , 这 个 模型 是 在 创建 套 接 字 后 通过 调用 WSAAsyncSelect ( ) 函数 实现 的 。 
WSAAsyncSelect 1/0 模型 将 套 接 字 的 事件 通知 包装 成 窗 体 消 息 发 送 到 窗 体 的 回调 函数 处 
理 , 从 而 实现 对 套 接 字 FD READ、FD_WRITE 等 网 络 事件 的 异步 响应 。WSAAsyncSelect 
1/O 模型 的 事件 定义 见 表 2. 5。 

WSAAsyncSelect I/O 模型 和 后 面 介绍 的 WSAEventSelect 1/0 模型 都 实现 了 套 接 字 
事件 的 异步 通知 机 制 , 但 它们 不 像 Overlapped I/O 及 Completion Port I/O 那样 提供 异步 
数据 传送 。WSAAsyncSelect 1/0 模型 的 优势 是 在 系统 开销 不 大 的 情况 下 能 够 同时 处 理 很 
多 连接 ,缺点 是 依赖 窗 体 的 消息 处 理 机 制 , 当 需要 通过 一 个 窗口 函数 处 理 成 千 上 万 的 套 接 字 
连接 时 容易 产生 瓶颈 问题 。 并 且 在 程序 不 需要 窗 体 (例如 服务 程序 ) 时 不 得 不 创建 一 个 
窗 体 。 
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2.4 节 的 程序 2. 9 一 程序 2. 11 采用 的 即 是 WSAAsyncSelect 1/0 模型 ,这 个 模型 特别 
适合 开发 基于 窗 体 的 应 用 程序 ,在 窗 体 过 程 函 数 (回调 函数 ) 中 顺便 就 把 套 接 字 的 事件 消息 
处 理 了 。 本 书 第 3 章 介 绍 的 MFC 套 接 字 类 CAsyncSocket 和 CSocket 都 是 基于 


WSAAsyncSelect I/O 模型 原理 实现 的 。 


下 面 给 出 WSAAsyncSelect L/O 模型 的 编程 模板 ,省 略 了 窗 体 程 序 的 其 他 细节 ,代码 


WF: 


# define WM_SOCKET WM_USER + 1 
# include < winsock2. h> 
# include < windows. h> 


int WINAPI WinMain ( HINSTANCE hInstance, HINSTANCE hPrevInstance, 
nCmdShow) 


{ 


BOOL CALLBACK ServerWinProc(HWND hDlg, UINT wMsg, WPARAM wParam, LPARAM lParam) 


{ 


WSADATA wsd; 

SOCKET Listen; 
SOCKADDR_IN InternetAddr; 
HWND Window; 


// 创 建 一 个 窗口 ,指定 窗口 处 理 函 数 ServerWinProc 
Window = CreateWindow(); 

// 启 动 WinSock, 并 创建 一 个 服务 器 侦 听 套 接 字 
WSAStartup(MAKEWORD(2, 2), &wsd); 

Listen - socket (AF INET, SOCK STREAM, IPPROTO TCP); 
// 将 套 接 字 绑 定 到 5150 端口 ,并 开始 侦 听 连接 请 求 
InternetAddr.sin family = AF INET; 

InternetAddr.sin addr.s addr - htonl(INADDR ANY); 
InternetAddr.sin port - htons(5150); 


bind(Listen, (PSOCKADDR) &InternetAddr, sizeof(InternetAddr)); 


// 使 用 上 面 定 义 的 WM. SOCKET 宏 常 量 标识 套 接 字 的 窗口 消息 通知 
WSAAsyncSelect(Listen, Window, WM SOCKET, FD ACCEPT | FD CLOSE); 


listen(Listen, 5); 


// 转 换 和 发 送 窗口 消息 ,直到 应 用 程序 终止 
while (1) 


ffs 


SOCKET Accept; 


switch(wMsg) 
t 
case WM_PAINT: 
// 处 理 窗口 重 绘 工作 
break; 


LPSTR lpCmdLine, int 
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case WM SOCKET: 
// 判 断 套 接 字 是 否 有 错误 发 生 
if (WSAGETSELECTERROR( lParam)) 
t 
// 显 示 错 误 信 息 并 关闭 套 接 字 
closesocket( (SOCKET) wParam); 
break; 
) 
// 判 断 套 接 字 上 发 生 了 什么 事件 
Switch(WSAGETSELECTEVENT( lParam) ) 
Í 
case FD_ACCEPT: 
// 接 受 一 个 连接 , 创建 一 个 连接 客户 机 的 套 接 字 Accept 
Accept = accept(wParam, NULL, NULL); 
// 定 义 接 受 套 接 字 Accept 的 读 / 写 和 关闭 事件 消息 
WSAAsyncSelect(Accept, hDlg, WM SOCKET, FD READ | FD WRITE | FD CLOSE); 
break; 
case FD READ: 
// 从 wParam 参数 指定 的 套 接 字 中 读 取 数据 
break; 
case FD WRITE: 
// 将 wParam 参数 指定 的 套 接 字 准 备 好 发 送 数据 
break; 
case FD CLOSE: 
// 关 闭 连接 
closesocket ( ( SOCKET) wParam) ; 
break; 
i 
break; 
} 
return TRUE; 


} 
读者 参照 这 个 模板 ,再 回头 读 一 读 程序 2.9 一 程序 2. 11, 会 有 茅 塞 顿 开 之 感 。 


2.5.4 WSAEventSelect 1/0 模型 
WSAEventSelect I/O 模型 是 WinSock2 提供 的 另 一 个 好 用 的 异步 1/O 模型 ,该 模型 允 


许 在 一 个 或 多 个 套 接 字 上 接收 以 套 接 字 事件 为 基础 的 网 络 事件 通知 。WinSock2 应 用 程序 
可 以 通过 调用 WSAEventSelect 函数 将 一 个 事件 对 象 与 网 络 事件 集合 关联 起 来 , 当 网 络 事 
件 发 生 时 ,应 用 程序 以 套 接 字 事 件 对 象 的 形式 接收 网 络 事件 通知 。 


WSAEventSelect I/O 模型 与 WSAAsyncSelect 1/0 模型 相似 ,主要 差别 在 于 当 网 络 事 


件 发 生 时 通知 应 用 程序 的 形式 不 同 。 虽然 两 者 都 是 异步 的 , WSAAsyncSelect 1/0 以 
Windows 窗 体 消息 的 形式 通知 ,需要 定义 窗 体 和 窗 体 函 数 , 而 WSAEventSelect 1/0 以 套 接 


"xs 
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与 select I/O 模型 相 比 ,WSAAsyncSelect I/O 5 WSAEventSelect I/O 模型 都 是 事件 


驱动 型 的 , 当 网 络 事件 发 生 时 ,由 系统 通知 应 用 程序 。 而 select L/O 模型 是 主动 型 的 ,应 用 
程序 主动 调用 select 函数 在 套 接 字 集合 上 依次 询问 是 否 发 生 了 网 络 事件 。 


WSAEventSelect 1/0 模型 是 通过 WSAEventSelect 函数 设置 的 ,但 在 使 用 这 个 函数 之 
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前 ,必须 先 调用 WSACreateEvent 函数 创建 一 个 事件 对 象 。 
1. WSACreateEvent 函数 


该 函数 的 功能 是 为 套 接 字 创建 一 个 套 接 字 事件 对 象 ,例如 : 
WSAEVENT WSACreateEvent(void); 


如 果 WSACreateEvent() 函 数 执行 成 功 ,会 返回 一 个 事件 对 象 句 柄 ,否则 返回 WSA _ 
INVALID EVENT, 返回 的 事件 对 象 初始 状态 为 未 触发 状态 手工 重 置 。 


2. WSAEventSelect 函数 


该 函数 的 功能 是 为 套 接 字 注册 网 络 事件 。 该 函数 将 事件 对 象 与 网 络 事 件 关联 起 来 , 当 
在 该 套 接 字 上 发 生 一 个 或 多 个 网 络 事件 时 ,应 用 程序 便 以 事件 对 象 的 形式 接收 这 些 网 络 事 
件 通知 。 例 如 : 

int WSAEventSelect( 

.In SOCKET s, 
.In WSAEVENT hEventObject, 
.In long lNetworkEvents 

); 

其 中 ,第 1 个 参数 s 代表 套 接 字 ,第 2 个 参数 hEventObject 代表 用 WSACreateEvent() 
函数 创建 的 套 接 字 事件 对 象 ,第 3 个 参数 INetworkEvents 代表 套 接 字 网 络 事件 的 组 合 。 

如 果 套 接 字 事件 对 象 和 网 络 事 件 关 联 成 功 ,函数 返回 0, 和 否则 返回 SOCKET. ERROR. 
可 以 调用 WSAGetLastError 来 获取 具体 的 错误 码 。 

在 调用 该 函数 后 , 套 接 字 自动 被 设置 为 非 阻 塞 的 工作 模式 。 

当 网 络 事件 到 来 时 ,与 套 接 字 关联 的 事件 对 象 由 “未 触发 状态 ” 变 为 “触发 状态 ”。 由 于 
它 是 手工 重 置 事件 ,应 用 程序 需要 手动 将 事件 的 状态 设置 为 “未 触发 状态 ”, 这 个 工作 通过 调 
用 WSAResetEvent KAKI. 


3. WSAResetEvent 函数 
该 函数 的 功能 是 设置 事件 对 象 的 工作 状态 为 "未 触发 状态 ”。 例 如 
BOOL WSAResetEvent(WSAEVENT hEvent) ; 


该 函数 的 参数 为 事件 对 象 ,如 果 调 用 成 功 返回 TRUE ,和 否则 返回 FALSE。 
当 不 再 使 用 事件 对 象 时 要 将 其 关闭 ,这 个 工作 通过 调用 WSACloseEvent 函数 完成 。 


4. WSACloseEvent 函数 


该 函数 的 功能 是 关闭 打开 的 事件 对 象 。 例 如 : 

BOOL WSAC1oseEvent (WSAEVENT hEvent); 

该 函数 只 有 一 个 事件 对 象 参数 ,如 果 执 行 成 功 返 回 TRUE, BUE E FALSE, 
5. WSAWaitForMultipleEvents 函数 


该 函数 等 待 网 络 事件 的 发 生 ,网 络 事 件 会 引起 套 接 字 事件 状态 的 变化 。 该 函数 用 于 监 
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视 一 个 或 所 有 套 接 字 事 件 对 象 是 否 变 为 “已 触发 状态 ”。 函 数 原型 : 


DWORD WSAWaitForMultipleEvents( 
In DWORD cEvents, 
.In const WSAEVENT * lphEvents, 
.In  BOOL fWaitAll, 
In DWORD dwTimeout, 
In BOOL fAlertable 


其 中 ,第 1 个 参数 cEvents 和 第 2 个 参数 IphEvents 代表 一 个 WSAEVENT 事件 对 象 
数组 ,cEvents 是 数组 中 事件 对 象 的 数量 ,lphEvents 是 指向 事件 数组 的 指针 。 

WSAWaitForMultipleEvents( ) 函数 能 够 监视 的 事件 对 象 的 最 大 数量 为 WSA _ 
MAXIMUM_WAIT_EVENTS( 即 64) ,所 以 ,对 于 调用 WSAWaitForMultipleEvents O PR 
数 的 线程 , WSAEventSelect L/O 模型 一 次 最 多 支持 64 个 套 接 字 。 如 果 想 基于 这 个 模型 处 
理 超 过 64 个 套 接 字 的 工作 , 则 需要 创建 更 多 的 工作 线程 。 

第 3 个 参数 fWaitAll 指定 WSAWaitForMultipleEvents O 函数 等 待 事件 通知 的 方式 ， 
如 果 为 TRUE, 那么 当 IphEvents 数组 中 的 所 有 事件 对 象 都 处 于 “已 触发 状态 ”时 函数 才 返 
回 , 如 果 为 FALSE, 只 要 一 个 事件 对 象 处 于 “已 触发 状态 ”就 返回 。 函 数 返回 值 指明 是 哪个 
事件 对 象 引 起 了 函数 返回 ,在 程序 中 一 般 将 这 个 参数 设置 为 FALSE, 即 一 次 只 处 理 一 个 套 
接 字 事件 对 象 。 

第 4 个 参数 dwTimeout 代表 WSAWaitForMultipleEvents() 函 数 的 超时 间隔 (单位 为 
毫秒 )。 如 果 超 时 ,函数 将 无 条 件 返 回 ; 如 果 超 时 间隔 为 0, 函数 检查 事件 对 象 后 会 立即 返 
F|; 如 果 在 指定 的 超时 间隔 内 没有 事件 对 象 就 绪 , WSAWaitForMultipleEvents() 函 数 会 返 
回 WSA_WAIT_TIMEOUT; 如 果 超 时 间隔 dwsTimeout 设置 为 WSA_INFINITE, 则 函数 
会 等 待 下 去 直到 有 事件 对 象 就 绪 才 返回 。 

第 5 个 参数 fAlertable 在 使 用 WSAEventSelect 1/0 模型 时 应 该 设置 为 FALSE, 这 个 
参数 主要 用 于 Overlapped 1/0 模型 。 

4 fWaitAll 为 TRUE 时 : 

CD 如 果 返 回 值 为 WSA_TIMEOUT, 则 表明 等 待 超时 。 

(2) 如 果 返 回 值 为 WSA_WAIT_EVENT _0, 表 明 所 有 对 象 都 已 变 成 “触发 状态 ”。 

G) 如 果 返 回 值 为 WAIT_IO_COMPLETION ,说 明 一 个 或 多 个 完成 例 程 已 经 排队 等 
待 执行 。 

当 fWaitAll 为 FALSE 时 : 

(1) 如 果 返 回 WSA_WAIT_EVENT_0 到 WSA_WAIT_EVENT_0 十 cEvents 一 1 范围 内 的 
值 ,说 明 有 一 个 对 象 变 为 “触发 状态 ”, 它 在 数组 中 的 下 标 为 : 返回 值 一 WSA_EVENT_0。 

(2) 如 果 函 数 调用 失败 , 则 返回 WSA WAIT FAILED, 

例如 ,下 面 的 代码 段 用 于 获取 变 为 “触发 状态 ”的 套 接 字 事件 对 象 : 


Index = WSAWaitForMultipleEvents(...); 
MyEvent = EventArray[Index — WSA WAIT EVENT 0]; 


6. WSAEnumNetworkEvents 函数 


通过 WSAWaitForMultipleEvents 的 返回 值 可 以 判断 发 生 网 络 事件 的 套 接 字 ,应 用 程 
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序 如 果 需 要 进一步 判断 在 该 套 接 字 上 究竟 发 生 了 什么 网 络 事件 ,可 以 通过 调用 
WSAEnumNetworkEvents 来 实现 ,函数 原型 : 


int WSAEnumNetworkEvents( 
In SOCKET s, 


.In . WSAEVENT hEventObject, 
.Out | LPWSANETWORKEVENTS lpNetworkEvents 
E 
该 函数 可 以 查找 发 生 在 套 接 字 上 的 网 络 事件 ,并 清除 系统 内 部 的 网 络 事件 记录 , 重 置 事 
件 对 象 。 其 参数 的 含义 如 下 。 
° s: 发 生 网 络 事件 的 套 接 字 句柄 。 
* hEventObject; 被 重 置 的 事件 对 象 句柄 (可 选 ) 。 
* lpNetworkEvents: 指向 WSANETWORKEVENTS 网 络 事件 结构 的 指针 。 
如 果 hEventObject 不 为 NULL, 则 该 事件 被 重 置 ; 如 果 为 NULL, 则 需要 调用 
WSAResetEvent 函数 设置 事件 为 “ 非 触 发 状态 ”。 
WSANETWORKEVENTS 结构 中 包含 了 发 生 网 络 事件 的 记录 和 相关 错误 码 ， 
WSANETWORKEVENTS 的 结构 如 下 : 
typedef struct WSANETWORKEVENTS 
{ 


long lNetworkEvents; 
int iErrorCode[FD MAX EVENTS]; 
) WSANETWORKEVENTS, FAR * LPWSANETWORKEVENTS; 
其 中 ,INetworkEvents 表示 发 生 的 网 络 事件 ,iErrorCode 为 包含 网 络 事件 错误 码 的 数 
组 ,错误 码 与 INetworkEvents 字段 中 的 网 络 事件 对 应 。 
在 应 用 程序 中 ,使 用 网 络 事件 错误 标识 符 对 iErrorCode 数组 进行 索引 ,检查 是 否 发 生 
了 网 络 错误 。 这 些 标识 符 的 命名 规则 是 在 对 应 的 网 络 事件 后 面 添加 ”BIT”。 例 如 ,对 应 
FD READ 的 网 络 事件 错误 标识 符 为 "FD_READ_BIT”。 


7. WSAEventSelect MO 模型 编程 模板 


下 面 的 代码 模板 归纳 了 利用 WSAEventSelect 1/0 模型 开发 一 个 服务 器 应 用 程序 的 
Jk. 


SOCKET SocketArray [WSA MAXIMUM WAIT EVENTS]; 

WSAEVENT EventArray [WSA MAXIMUM WAIT EVENTS], NewEvent; 
SOCKADDR IN InternetAddr; 

SOCKET Accept, Listen; 

DWORD EventTotal - 0; 

DWORD Index, i; 


// 建 立 一 个 TCP 套 接 字 ,用 于 侦 听 端口 5150 
Listen = socket (AF INET, SOCK STREAM, 0); 


InternetAddr.sin family - AF INET; 
InternetAddr.sin addr.s addr = htonl(INADDR ANY); 
InternetAddr.sin port = htons(5150); 
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bind(Listen, (PSOCKADDR) &InternetAddr, sizeof(InternetAddr)); 
NewEvent - WSACreateEvent(); 

WSAEventSelect(Listen, NewEvent, FD ACCEPT | FD CLOSE); 
listen(Listen, 5); 

SocketArray[EventTotal] - Listen; 

EventArray[EventTotal] - NewEvent; 

EventTotal**; 


while(TRUE) 

( 
// 在 所 有 套 接 字 上 等 待 网 络 事件 的 发 生 
Index = WSAWaitForMultipleEvents(EventTotal, EventArray, FALSE, WSA INFINITE, FALSE); 
Index = Index — WSA WAIT EVENT 0; 


// 如 果 有 一 个 以 上 的 信号 ,遍历 所 有 事件 

for(i = Index; i « EventTotal ;i++) 

{ 

Index = WSAWaitForMultipleEvents(1, &EventArray[i], TRUE, 1000, FALSE); 

if ((Index WSA WAIT FAILED) || (Index -- WSA WAIT TIMEOUT)) 
continue; 

else 


{ 


Index = i; 
WSAEnumNetworkEvents(SocketArray[Index], EventArray[Index], &NetworkEvents); 


// 检 查 FD ACCEPT 消息 
if (NetworkEvents.lNetworkEvents & FD ACCEPT) 
{ 
if (NetworkEvents. iErrorCode[FD ACCEPT BIT] != 0) 
{ 
printf("FD ACCEPT failed with error 5 d\n", NetworkEvents. iErrorCode[FD_ 
ACCEPT BIT]); 
break; 
i 
// 接 受 新 的 链接 ,并 将 其 存 人 套 接 字 数组 
Accept = accept(SocketArray[Index], NULL, NULL); 
// 由 于 无 法 处 理 超过 WSA MAXIMUM WAIT EVENTS 数量 的 套 接 字 , 故 关闭 接收 套 接 字 
if (EventTotal > WSA MAXIMUM WAIT EVENTS) 
{ 
printf("Too many connections"); 
closesocket(Accept) ; 
break; 


NewEvent - WSACreateEvent(); 
WSAEventSelect(Accept, NewEvent, FD READ | FD WRITE | FD CLOSE); 
EventArray[EventTotal] = NewEvent; 
SocketArray[EventTotal] = Accept; 
EventTotal**; 
printf("Socket % d connected in", Accept); 
i 
// 处 理 FD. READ 通知 
if (NetworkEvents.lNetworkEvents & FD READ) 
t 
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if (NetworkEvents. iErrorCode[FD READ BIT] != 0) 
{ 
printf("FD READ failed with error % d\n",NetworkEvents. iErrorCode[FD READ BIT]); 
break; 
} 
// 从 套 接 字 读 取 数据 
recv(SocketArray[Index — WSA WAIT EVENT 0], buffer, sizeof(buffer), 0); 
i 
// hb BB FD WRITE 通知 
if (NetworkEvents. lNetworkEvents & FD WRITE) 


t 
if (NetworkEvents. iErrorCode[FD WRITE BIT] != 0) 


1 
printf("FD WRITE failed with error % d\n", NetworkEvents. iErrorCode[FD WRITE BIT]); 
break; 


i 
send(SocketArray[Index — WSA WAIT EVENT 0], buffer, sizeof(buffer), 0); 


) 


if (NetworkEvents.lNetworkEvents & FD CLOSE) 


{ 
if (NetworkEvents. iErrorCode[FD CLOSE BIT] != 0) 


{ 
printf("FD CLOSE failed with error * d\n", NetworkEvents. iErrorCode 
[FD CLOSE BIT]); 
break; 
) 
closesocket(SocketArray[Index]); 
// 从 Socket 和 Event 数组 中 删除 套 接 字 , 并 递减 EventTotal 
CompressArrays(EventArray, SocketArray, &EventTotal); 


) 
) 


程序 开始 时 会 创建 侦 听 套 接 字 , 利用 WSAEventSelect 函数 为 套 接 字 关联 FD _ 
ACCEPT fil FD CLOSE 网 络 事件 ,然后 套 接 字 进入 侦 听 状态 。 在 while 循环 中 ,循环 调用 
WSAWaitForMultipleEvents 函数 等 待 网 络 事件 的 发 生 , 当 网 络 事件 发 生 时 函数 返回 ,并 通 
过 该 函数 的 返回 值得 到 发 生 网 络 事件 的 套 接 字 ,调用 WSAEnumNetworkEvents 函数 检查 
在 该 套 接 字 上 到 底 发 生 什么 网 络 事件 。 

如 果 发 生 FD ACCEPT 网 络 事件 , 则 调用 accept 函数 接受 客户 端 连接 并 创建 新 套 接 
字 , 将 新 套 接 字 加 入 套 接 字数 组 ,创建 事件 对 象 并 加 入 事件 数组 ,事件 对 象 数量 加 一 。 

然后 调用 WSAEventSelect 函数 为 新 套 接 字 关 联 事件 对 象 ,注册 FD_READ、FD_ 
WRITE 和 FD_CLOSE 网 络 事件 。 如 果 发 生 FD_READ 网 络 事件 , 则 调用 recv 函数 接收 数 
据 ; 如 果 发 生 FD_WRITE 网 络 事件 , 则 调用 send 函数 发 送 数据 ; 如 果 发 生 FD_CLOSE 网 
络 事件 , 则 将 新 套 接 字 从 套 接 字数 组 清除 ,同时 将 对 应 事件 从 事件 数组 删除 ,事件 对 象 数量 
减 一 ,并 关闭 该 套 接 字 。 

在 应 用 程序 中 ,在 判断 发 生 的 各 种 网 络 事件 之 前 ,首先 应 判断 是 否 发 生 了 网 络 错误 。 

WSAEventSelect 模型 的 优点 是 概念 简单 且 不 需要 创建 窗 体 环境 ,唯一 的 不 足 是 单线 


第 2 章 WinSock2 AP1 编 程 x 


程 最 大 只 能 监视 64 个 套 接 字 事 件 对 象 ,虽然 可 以 通过 线程 池 技 术 弥 补 这 个 不 足 , 但 是 一 味 
地 增加 线程 会 消耗 系统 资源 过 快 ,因此 其 可 扩展 性 不 如 重生 1/O 模型 。 


8. WSAEventSelect 1/0 模型 服务 器 编程 实例 


程序 2. 14 给 出 一 个 WSAEventSelect 模型 服务 器 编程 实例 ,服务 器 在 端口 5150 侦 听 
TCP 连接 , 回 送 客户 机 数据 。 
程序 2.14  WSAEventSelect I/O 模型 回 送 服务 器 完整 代码 


/ /WShEventSelect 1/0 模型 回 送 服务 器 
/ /WSAEventSelect.cpp 

# include < winsock2.h> 

# include < windows. h> 

# include < stdio. h> 

* pragma comment( lib, "ws2_32. lib") 
# define PORT 5150 

# define DATA_BUFSIZE 8192 


typedef struct _SOCKET_INFORMATION { 
CHAR Buffer[DATA BUFSIZE]; 
WSABUF DataBuf; 
SOCKET Socket; 
DWORD BytesSEND; 
DWORD BytesRECV; 
) SOCKET INFORMATION, * LPSOCKET INFORMATION; 


BOOL CreateSocketInformation(SOCKET s); 
void FreeSocketInformation(DWORD Event); 


DWORD EventTotal - 0; 
WSAEVENT EventArray[WSA MAXIMUM WAIT EVENTS]; 
LPSOCKET INFORMATION SocketArray[WSA MAXIMUM WAIT EVENTS]; 


int main(int argc, char * * argv) 
{ 
SOCKET Listen; 
SOCKET Accept; 
SOCKADDR_IN InternetAddr; 
LPSOCKET INFORMATION SocketInfo; 
DWORD Event; 
WSANETWORKEVENTS NetworkEvents; 
WSADATA wsaData; 
DWORD Flags; 
DWORD RecvBytes; 
DWORD SendBytes; 


if (WSAStartup(0x0202, &wsaData) !- 0) 

t 
printf("WSAStartup() failed with error * din", WSAGetLastError()); 
return 1; 

) 

else 
printf("WSAStartup() is OK! Wn") ; 
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`. 


if ((Listen = socket(AF_INET, SOCK_STREAM, 0)) == INVALID_SOCKET) 
{ 
printf("socket() failed with error % d\n", WSAGetLastError()); 
return 1; 
} 
else 
printf("socket() is OK!\n"); 


if(CreateSocketInformation(Listen) -- FALSE) 
printf("CreateSocketInformation() failed! Wn"); 
else 
printf("CreateSocketInformation() is OK! An") ; 


if (WSAEventSelect(Listen, EventArray[EventTotal — 1], FD ACCEPT|FD CLOSE) == SOCKET. 
ERROR) 
{ 
printf("WSAEventSelect() failed with error * d\n", WSAGetLastError()); 
return 1; 
) 
else 


printf("WSAEventSelect() is pretty fine! Wn"); 


InternetAddr.sin family = AF INET; 
InternetAddr.sin addr.s addr - htonl(INADDR ANY); 
InternetAddr.sin port - htons(PORT); 


if (bind(Listen, (PSOCKADDR) &InternetAddr, sizeof(InternetAddr)) -- SOCKET ERROR) 
{ 
printf("bind() failed with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("bind() is OK! Wn"); 


if (listen(Listen, 5)) 

t 
printf("listen() failed with error % d\n", WSAGetlastError()); 
return 1; 

) 

else 
printf("listen() is OK!Nn"); 


while(TRUE) 
t 
// 等 待 套 接 字 接收 1/0 通知 
if ((Event = WSAWaitForMultipleEvents (EventTotal, EventArray, FALSE, WSA_ INFINITE, 
FALSE)) == WSA WAIT FAILED) 
t 
printf("WSHWaitForMultipleEvents() failed with error * d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("WSAWaitForMultipleEvents() is pretty damn OK! Vn") ; 
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if (WSAEnumNetworkEvents(SocketArray[Event — WSA WAIT EVENT 0] -> Socket, 


EventArray[Event 一 WSA WAIT EVENT 0], &NetworkEvents) SOCKET ERROR) 

{ 
printf("WSAEnumNetworkEvents() failed with error % d\n", WSAGetLastError()); 
return 1; 

) 

else 


printf("WSAEnumNetworkEvents() should be fine! An"); 


if (NetworkEvents.lNetworkEvents & FD ACCEPT) 
{ 
if (NetworkEvents.iErrorCode[FD ACCEPT BIT] != 0) 
{ 
printf("FD ACCEPT failed with error % d\n", NetworkEvents. iErrorCode[ FD_ACCEPT_ 
BIT]); 
break; 


if ((Accept = accept(SocketArray[Event — WSA WAIT EVENT 0] - > Socket, NULL, 
NULL)) == INVALID SOCKET) 
{ 
printf("accept() failed with error % din", WSAGetLastError()); 
break; 
) 
else 
printf("accept() should be OK! Wn") ; 


if (EventTotal > WSA MAXIMUM WAIT EVENTS) 

{ 
printf("Too many connections — closing socket...\n"); 
closesocket (Accept); 
break; 


CreateSocketInformation(Accept); 


if (WSAEventSelect(Accept, EventArray[EventTotal — 1], FD READ|FD WRITE|FD CLOSE) 
== SOCKET ERROR) 
{ 
printf("WSAEventSelect() failed with error * din", WSAGetLastError()); 
return 1; 
) 
else 
printf("WSAEventSelect() is OK! Vn"); 


printf("Socket % d got connected...An", Accept); 


// 如 果 读 取 和 写 入 事件 发 生 , 试 着 对 数据 缓冲 区 读 取 和 写 入 数据 
if (NetworkEvents.lNetworkEvents & FD READ | | NetworkEvents. lNetworkEvents & FD WRITE) 
i 
if (NetworkEvents.lNetworkEvents & FD READ && NetworkEvents. iErrorCode[FD READ BIT] 
!= 0) 
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printf("FD READ failed with error % d\n", NetworkEvents. iErrorCode[FD READ BIT]); 
break; 
) 
else 
printf("FD READ is OK! Vn"); 


if (NetworkEvents.lNetworkEvents & FD WRITE && NetworkEvents. iErrorCode[FD WRITE 
BIT] != 0) 
{ 
printf("FD WRITE failed with error % d\n", NetworkEvents. iErrorCode[FD WRITE - 
BIT]); 
break; 
} 
else 
printf("FD WRITE is OK! n"); 


SocketInfo - SocketArray[Event - WSA WAIT EVENT 0]; 


// 当 收 到 的 字 节 数 为 0 时 读 取 数 据 

if (SocketInfo 一 > BytesRECV == 0) 

{ 
SocketInfo - > DataBuf. buf SocketInfo -> Buffer; 
SocketInfo -> DataBuf. len = DATA_BUFSIZE; 


Flags = 0; 


if (WSARecv(SocketInfo -> Socket, &(SocketInfo -> DataBuf), 1, &RecvBytes, 
&Flags, NULL, NULL) -- SOCKET ERROR) 
{ 
if (WSAGetLastError() != WSAEWOULDBLOCK) 
{ 
printf("WSARecv() failed with error % d\n", WSAGetLastError()); 
FreeSocketInformation(Event — WSA WAIT EVENT 0); 
return 1; 


} 

else 

{ 
printf("WSARecv() is working! n"); 
SocketInfo - > BytesRECV = RecvBytes; 


) 


// 当 收 到 的 字 节 数 大 于 发 送 的 字 节 数 时 发 送 数据 
证 (SocketInfo -> BytesRECV > SocketInfo 一 > BytesSEND) 
{ 
SocketInfo -> DataBuf. buf = SocketInfo-> Buffer + SocketInfo 一 > BytesSEND; 
SocketInfo-» DataBuf.len = SocketInfo 一 > BytesRECV — SocketInfo 一 > BYtesSEND; 


if (WSASend(SocketInfo -> Socket, &(SocketInfo 一 > DataBuf), 1, &SendBytes, 0, 
NULL, NULL) -- SOCKET ERROR) 
t 
if (WSAGetLastError() != WSAEWOULDBLOCK) 
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{ 
printf("WSASend() failed with error % d\n", WSAGetLastError()); 
FreeSocketInformation(Event — WSA WAIT EVENT 0); 
return 1; 
) 
) 
else 


printf("WSASend() is fine! Thank you...Vn"); 
SocketInfo -> BytesSEND + = SendBytes; 
// 收 发 完成 
if (SocketInfo 一 > BytesSEND == SocketInfo -> BytesRECV) 
{ 

SocketInfo -> BytesSEND = 0; 

SocketInfo - > BytesRECV 0; 


if (NetworkEvents.lNetworkEvents & FD CLOSE) 
{ 
if (NetworkEvents. iErrorCode[FD CLOSE BIT] != 0) 


{ 
printf("FD CLOSE failed with error * d\n", NetworkEvents. iErrorCode[FD_ 
CLOSE BIT]); 
break; 
) 
else 


printf("FD CLOSE is OK! Vn") ; 


printf("Closing socket information % d\n", SocketArray[Event — WSA WAIT EVENT 0] -> 
Socket) ; 


FreeSocketInformation(Event — WSA WAIT EVENT 0); 


) 
return 0; 


) 


BOOL CreateSocketInformation(SOCKET s) 
{ 
LPSOCKET INFORMATION SI; 


if ((EventArray[EventTotal] - WSACreateEvent()) -- WSA INVALID EVENT) 

t 
printf("WSACreateEvent() failed with error * d\n", WSAGetLastError()); 
return FALSE; 

} 

else 
printf("WSACreateEvent() is OK! Wn") ; 


if ((SI - (LPSOCKET INFORMATION) GlobalAlloc(GPTR, sizeof(SOCKET INFORMATION))) -- NULL) 
t 
printf("GlobalAlloc() failed with error % d\n", GetlastError()); 
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return FALSE; 
} 


else 


printf("GlobalAlloc() for LPSOCKET INFORMATION is OK!\n"); 


// 准 备 使 用 SocketInfo 结构 
SI-»Socket = s; 

SI 一 > BytesSEND = 0; 

SI 一 > BytesRECV = 0; 


SocketArray[EventTotal] = SI; 
EventTotal**; 
return(TRUE); 

) 


void FreeSocketInformation(DWORD Event) 

{ 
LPSOCKET INFORMATION SI = SocketArray[Event]; 
DWORD i; 


closesocket(SI —> Socket); 
GlobalFree(SI); 


if(WSACloseEvent(EventArray[Event]) == TRUE) 
printf("WSACloseEvent() is OK!\n\n"); 
else 


printf("WSACloseEvent() failed miserabily! nn") ; 


// 将 套 接 字 和 事件 从 数组 删除 
for (i = Event; i < EventTotal; i++) 
{ 
EventArray[i] = EventArray[i + 1]; 
SocketArray[i] = SocketArray[i + 1]; 
} 


EventTotal —— ; 


) 
程序 2. 14 的 测试 步骤 如 下 : 


(1) 启动 服务 器 程序 ,其 初始 运行 界面 如 图 2. 30 所 示 ,可 见 服务 器 工作 正常 。 


(2) 启动 TcpClient 客户 机 程序 ,在 命令 行 中 输 
入 以 下 命令 : 

TcpClient - p:5150 -s:localhsot -n:2 

客户 机 的 运行 结果 如 图 2. 31 所 示 , 即 连接 到 服 
务 器 并 收 到 了 服务 器 回 送 的 数据 。 
和 新 观察 服务 器 界面 的 反应 ,如 图 2. 32 所 示 。 
请 读者 对 照 程序 ,自行 写 出 服务 器 运行 的 结果 分 析 。 


C: \WINDO ystem32 cm... 


INFORMATION is OK 


图 2.30 WSAEventSelect I/O 模型 回 送 
服务 器 初始 界面 
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图 2. 31 TcpClient 客户 机 连接 服务 器 后 的 界面 图 2.32 WSAEventSelect 1/O 模型 服务 器 
响应 客户 机 界面 


2.5.5 Overlapped 1/0 模型 


利用 Overlapped I/OCHfiz& I/O) 模 型 ,应 用 程序 能 一 次 投递 一 个 或 多 个 I/O 请 
统 完成 1/O 操作 后 通知 应 用 程序 。 与 前 面 介绍 的 4 种 W/O 模型 相 比 ,该 模型 是 真正 
的 异步 I/O 模型 , 它 能 使 WinSock 应 用 程序 达到 更 高 的 性 能 。 

WinSock £ I/O 基于 Windows 38 & 1/0 机 制 实现 。 从 发 送 和 接收 数据 的 角度 来 
fi. t GR LO 模型 与 前 面 介 绍 的 Select I/O 模型 WSAAsyncSelect 1/0 模型 和 
WSAEventSelect 1/0 模型 都 不 同 , 因 为 在 上 述 这 3 个 模型 中 开始 读 / 写 数据 后 还 是 同步 的 。 
例如 ,在 应 用 程序 调用 WSARecv 函数 时 ,都 会 在 WSARecv 函数 内 部 发 生 阻塞 ,直到 数据 
接收 完毕 后 才 返 回 , ñj E ë 1/0 模型 会 在 调用 WSARecv 后 立即 返回 。 

注意 : 套 接 字 的 重 登 I/O 属性 不 会 对 套 接 字 的 当前 工作 模式 产生 影响 ,创建 具有 重 受 
属性 的 套 接 字 执行 重合 I/O 〇 操作 ,并 不 会 改变 套 接 字 的 阻塞 模式 。 套 接 字 的 阻塞 模式 与 重 
d I/O RERA. EË I/O 模型 仅 对 WSASend 和 WSARecv 的 行为 有 影响 。 


1. & & /0 模型 函数 


WinSock 主要 通过 以 下 函数 和 一 个 被 称 作 WSAOVERLAPPED 的 结构 实现 重 侄 1⁄O 
HL 

* WSASend) 

* WSASendTo() 

* WSARecvO 

* WSARecvFromO 

* WSAloctlO 

* WSARecvMsgO 
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AcceptEx() 
ConnectEx() 


TransmitFile() 


TransmitPackets() 


DisconnectEx() 

e WSANSPIoctl() 

上 述 函 数 使 用 WSAOVERLAPPED 结构 作为 参数 。 当 这 些 函 数 工 作 于 
WSAOVERLAPPED 模式 时 ,其 调用 会 立即 返回 ,而 不 管 套 接 字 处 于 何 种 工作 模式 ( 阻 
JEMA). EIR RUR i WSAOVERLAPPED 结构 管理 1/0 请 求 的 完成 情况 , 重 秋 
1/O 采 用 事件 或 完成 例 程 通知 程序 异步 操作 已 完成 。 另 外 ,前 6 个 函数 都 包括 
WSAOVERLAPPED_COMPLETION_ROUTINE 这 个 参数 ,这 是 一 个 可 选 指针 类 型 的 参 
数 , 它 指向 一 个 完成 例 程 。 


2. WSAOVERLAPPED 结构 
WSAOVERLAPPED 结构 将 事件 对 象 和 重 释 1/O 操作 关联 在 一 起 。 例 如 : 


typedef struct WSAOVERLAPPED { 
ULONG_PTR Internal; 
ULONG_PTR InternalHigh; 
union { 
struct { 
DWORD Offset; 
DWORD OffsetHigh; 
}; 
PVOID Pointer; 
}; 
HANDLE hEvent; 
} WSAOVERLAPPED, * LPWSAOVERLAPPED; 


其 中 , Internal, InternalHigh, Offset, OffsetHigh 和 Pointer 5 个 参数 由 系统 使 用 ， 
hEvent 用 于 程序 关联 事件 对 象 。 
应 用 程序 可 以 简单 地 执行 以 下 3 个 步骤 将 一 个 事件 对 象 与 套 接 字 关联 起 来 : 
(1) 调用 WSACreateEvent 创建 事件 对 象 。 
(2) 将 该 事件 赋值 给 WSAOVERLAPPED 结构 的 hEvent 字段 。 
(3) 使 用 该 重 释 结构 调用 WSASend 或 WSARecv 函数 。 
事件 对 象 与 WSAOVERLAPPED 结构 关联 后 ,在 应 用 程序 中 调用 
WSAWaitForMultipleEvents 函数 等 待 事件 的 发 生 。 
WSAGetOverlappedResult KAUN FRR EER FEWER IO 操作 结果 。 函 数 原型 : 
BOOL WSAAPI WSAGetOverlappedResult( 
In SOCKET s, 
In  LPWSAOVERLAPPED lpOverlapped, 
.Out | LPDWORD lpcbTransfer, 


In BOOL fWait, 
.Out | LPDWORD lpdwFlags 
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其 参数 的 含义 如 下 。 


s: 发 起 重生 操作 的 套 接 字 。 

lpOverlapped: 发 起 重 倒 操作 的 WSAOVERLAPPED 结构 指针 。 

lpcbTransfer: 实际 发 送 或 接收 的 字 节 数 。 

fWait: 函数 返回 的 方式 。 如 果 为 TRUE, 该 函数 直到 重生 1/O 完成 时 才 返 回 ; 如 果 
为 FALSE 并 且 VO 操作 处 于 等 待 执行 状态 , 则 函数 返回 FALSE. 用 
WSAGetLastError 捕获 的 错误 码 为 WSA_IO_INCOMPLETE。 

lpdwFlags: 接收 完成 状态 的 附加 标识 ,不 能 为 空 。 


当 该 函数 返回 TRUE 时 ,表示 重生 1/O 操作 已 经 完成 ,lpcbTransfer 参数 指明 实际 处 
理 的 数据 字 节 数 ; 当 该 函数 返回 FALSE j. KREA 1/O 还 未 完成 。 


3. 


Er I/O 服务 器 编程 模板 


下 面 提供 一 个 重生 I/O 编程 模板 , 供 读者 学 习 , 代 码 如 下 : 


# define DATA BUFSIZE 4096 
void main() 


( 


WSABUF DataBuf; 

char buffer[DATA BUFSIZE]; 

DWORD EventTotal - 0, RecvBytes - 0, Flags - 0; 
WSAEVENT EventArray[WSA MAXIMUM WAIT EVENTS]; 
WSAOVERLAPPED AcceptOverlapped; 

SOCKET ListenSocket, AcceptSocket; 


// 步 骤 (1) 
// 开 始 WinSock 服务 并 创建 一 个 侦 听 套 接 字 


// 步 骤 (2) 
// 接 受到 达 的 链接 
AcceptSocket = accept(ListenSocket, NULL, NULL); 


// 步 骤 (3) 
// 建 立 重 全 结构 
EventArray[EventTotal] = WSACreateEvent(); 


ZeroMemory(&AcceptOverlapped, sizeof(WSAOVERLAPPED)); 
AcceptOverlapped.hEvent = Eventàrray[EventTotal]; 


DataBuf.len - DATA BUFSIZE; 
DataBuf.buf = buffer; 
EventTotal++ ; 

// 步 骤 (4) 


// 发 送 一 个 WSARecv 请 求 , 以便 在 套 接 字 上 接收 数据 
if (WSARecv(AcceptSocket, &DataBuf, 1, &RecvBytes, &Flags, &AcceptOverlapped, NULL) == 


SOCKET ERROR) 


{ 
if (WSAGetLastError() != WSA IO PENDING) 
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`. 


// 错 误 处 理 


// 处 理 套 接 字 上 的 重叠 接收 
while(TRUE) 
t 
DWORD Index; 
/ [3998 (5) 
// 等 候 重 合 r/o 调用 结束 
Index = WSAWaitForMultipleEvents (EventTotal, EventArray, FALSE, WSA INFINITE, FALSE); 


// 索 引 应 为 0, 因 为 EventArray 中 仅 有 一 个 事件 


// 步 又 (6) 
// 重 置 已 触发 的 事件 
WSAResetEvent (EventArray[ Index — WSA_WAIT EVENT 0]); 


// 步 骤 (7) 
// 确 定 重合 请 求 的 状态 
WSAGetOverlappedResult(AcceptSocket, &AcceptOverlapped, &BytesTransferred, FALSE, &Flags); 


// 检 查 客户 机 是 否 已 经 关闭 了 连接 ,如 果 关 闭 , 则 关闭 套 接 字 

if (BytesTransferred == 0) 

{ 
printf("Closing socket $ d\n", AcceptSocket); 
closesocket( AcceptSocket) ; 
WSACloseEvent(EventArray[Index — WSA WAIT EVENT 0]); 
return; 


j 


// 对 接收 到 的 数据 进行 处 理 
//DataBuf 中 包含 收 到 的 数据 


// 步 骤 (8) 

// 在 套 接 字 上 开启 另 一 个 WSARecv 请 求 

Flags = 0; 

ZeroMemory(&AcceptOverlapped, sizeof(WSAOVERLAPPED)); 


AcceptOverlapped.hEvent = EventArray[Index — WSA WAIT EVENT 0]; 


DataBuf.len 
DataBuf.buf 


DATA BUFSIZE; 
buffer; 


if (WSARecv(AcceptSocket, SDataBuf, 1, &RecvBytes, &Flags, &AcceptOverlapped, NULL) == 
SOCKET ERROR) 
t 
if (WSAGetLastError() != WSA IO PENDING) 
t 
// 出 错 处 理 
} 
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cH EE TEUER I/O 程序 模板 的 编程 步骤 概述 如 下 : 

CD 创建 侦 听 套 接 字 ,并 在 指定 端口 上 开始 侦 听 连接 请 求 。 

(2) 接受 到 达 的 客户 机 连接 。 

(3) 为 接受 连接 的 套 接 字 创 建 一 个 WSAOVERLAPPED 结构 并 为 其 绑 定 一 个 事件 对 
象 ,同时 将 事件 对 象 存 人 一 个 事件 数组 ,以 供 WSAWaitForMultipleEvents O 函数 使 用 。 

(4) 借助 WSAOVERLAPPED 参数 ,使 用 WSARecv() 发 送 一 个 异步 请 求 。 

(5) 调用 WSAWaitForMultipleEvents() 函 数 监视 事件 数组 ,等 待 事件 对 象 被 触发 。 

(6) 使 用 WSAGetOverlappedResult O J| Bp EA 1/0 调用 的 返回 结果 。 

(7) 使 用 WSAResetEvent() 复 位 事件 数组 中 的 事件 对 象 ,处 理 已 完成 的 重 人 请求。 

(8) 用 WSARecvOJF Ji 53 — T E iio , 

(9) 重复 步骤 (5) 一 (8) 。 

HFEA 1/O 服务 器 实例 的 演示 ,请 读者 参考 课件 中 附带 的 程序 。 


2.5.6 1/0 Completion Port 模型 


I/O Completion Port(1/O 完成 端口 ) 模 型 是 在 多 处 理 器 系统 上 处 理 多 个 异步 1/0 请 求 
的 高 效 的 线程 模型 。 当 一 个 进程 创建 一 个 IVO 完成 端口 时 ,系统 会 创建 维护 一 个 队列 来 处 
理 异步 并 发 I/O 请 求 , 通 过 使 用 I/O 完成 端口 结合 预 分 配 的 线程 池 , 可 以 更 快速 ,更 有 效 地 
对 客户 机 作出 响应 ,而 不 是 在 收 到 一 个 I/O 请 求 时 才 开 始 创建 线程 。 

一 个 请 求 开 设 一 个 线程 的 工作 模式 ,将 造成 CPU 在 大 量 的 线程 间 进 行 切换 ,开销 是 很 
大 的 。 完 成 端口 L/O 模型 避免 了 单纯 的 增加 线程 策略 ,对 于 同时 到 达 的 500 个 客户 机 请 求 
不 会 出 现 开设 500 个 可 运行 的 线程 的 情况 。 


1. 完成 端口 函数 
I/O 完成 端口 的 工作 机 制 由 一 些 函 数 完成 ,其 中 最 重要 的 是 创建 端口 函数 


CreateIoCompletionPort 。 

CreateloCompletionPort 函数 负责 创建 一 个 L/O 完成 端口 ,并 关联 一 个 或 多 个 文件 句 
柄 。 这 里 的 文件 句柄 是 一 个 系统 抽象 ,不仅 可 以 是 一 个 磁盘 上 的 文件 ,还 可 以 是 一 个 网 络 端 
ATCP 套 接 字 或 命名 管道 等 ,也 可 以 是 任何 系统 对 象 ,只 要 它 支 持 重 I/O 即 可 。 其 他 相 
关 的 函数 如 下 : 


* ConnectNamedPipe 


DeviceloControl 
LockFileEx 
ReadDirectoryChangesW 
ReadFile 
TransactNamedPipe 


WaitCommEvent 
WriteFile 
WSASendMsg 
WSASendTo 
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* WSASend 
* WSARecvFrom 
* WSARecvMsg 
* WSARecv 
上 述 函 数 配合 CreateloCompletionPort 创建 的 端口 ,再 加 上 一 个 OVERLAPPED 结构 
和 一 个 文件 句柄 实现 了 完成 端口 的 工作 机 制 。 
创建 完成 端口 的 函数 如 下 : 
HANDLE WINAPI CreateIoCompletionPort( 
In HANDLE FileHandle, 
.In opt HANDLE ExistingCompletionPort, 


In ULONG PTR CompletionKey, 
In DWORD NumberOfConcurrentThreads 


这 个 函数 会 完成 两 个 任务 : 一 是 创建 一 个 1/O 完成 端口 对 象 ; 二 是 将 一 个 设备 与 一 个 
1/0 完成 端口 关联 起 来 。 
其 参数 的 含义 如 下 。 
* FileHandle: 设备 句柄 ,在 网 络 通信 中 就 是 套 接 字 。 
* ExistingCompletionPort: 与 设备 关联 的 1/O 完成 端口 句柄 。 当 为 NULL 时 ,系统 
会 创建 新 的 完成 端口 。 
e NumberOfConcurrentThreads: 可 以 为 7O 完成 端口 开设 的 最 大 线程 数 。 如 果 该 参数 
为 0, 则 根据 系统 中 处 理 器 的 数量 设 定 并 行 线程 数 。 如 果 ExistingCompletionPort 参数 
不 为 NULL, 此 参数 被 忽略 。 
如 果 函 数 调 用 成 功 , 则 返回 值 是 一 个 I/O 完成 端口 的 句柄 , 且 分 为 以 下 儿 种 情况 : 
(1) 如 果 ExistingCompletionPort 参数 为 NULL, 则 返回 值 是 一 个 新 的 句柄 。 
(2) 如 果 ExistingCompletionPort 参数 是 一 个 有 效 的 L/O 完成 端口 句柄 ,返回 值 是 相 
同 的 句柄 。 
(3) 如 果 文 件 句柄 参数 是 一 个 有 效 的 句柄 , 则 文件 句柄 与 1/O 完成 端口 关联 起 来 。 
如 果 函 数 失败 ,返回 值 是 NULL。 如 果 要 得 到 错误 信息 ,请 调用 GetLastError R% 


2. 完成 端口 编程 模板 


创建 完成 端口 /O 模型 的 基本 步骤 如 下 : 

(1) 创建 一 个 完成 端口 ,可 将 第 4 个 参数 设置 为 0, 以 指定 根据 处 理 器 的 数量 创建 工作 
线程 。 

(2) 确定 系统 处 理 器 的 数量 。 

(3) 根据 上 一 步 获得 的 处 理 器 数量 ,用 CreateThread() 创 建 为 完成 端口 服务 的 工作 
线程 。 

(4) 创建 一 个 负责 侦 听 的 套 接 字 ,在 指定 端口 侦 听 连接 请 求 。 

(5) 使 用 WSAAccept 函数 接受 连接 请 求 。 

(6) 创建 一 个 数据 结构 来 保存 套 接 字 句柄 。 

(7) 将 WSAAccept 函数 返回 的 套 接 字 关 联 到 CreateloCompletionPort C 创建 的 完成 
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端口 上 。 


(8) 开始 在 接受 的 连接 上 处 理 1/0. 
(9) 重复 步骤 (5) 一 (8) 。 
根据 上 述 步 又 实现 的 完成 端口 编程 模板 如 下 : 


HANDLE CompletionPort; 
WSADATA wsd; 

SYSTEM_INFO SystemInfo; 
SOCKADDR_IN InternetAddr; 
SOCKET Listen; 

int i; 


typedef struct PER HANDLE DATA 
( 
SOCKET Socket; 
SOCKADDR STORAGE ClientAddr; 
// 套 接 字句 柄 关联 的 其 他 信息 
) PER HANDLE DATA, * LPPER HANDLE DATA; 


// 加 载 WinSock 
StartWinsock(MAKEWORD(2,2), &wsd); 


// 步 又 (1) 
// 创 建 一 个 1/0 完成 端口 
CompletionPort = CreateloCompletionPort(INVALID HANDLE VALUE, NULL, 0, 0); 


/ Hp 9R (2) 
// 确 定 系统 有 多 少 个 处 理 器 
GetSystenInfo(&SystemInfo); 


// 803) 
// 基 于 系统 中 可 用 的 处 理 器 数量 创建 工作 线程 
// 对 于 这 个 例子 ,为 每 个 处 理 器 创建 一 个 工作 线程 
for(i = 0; i< SystemInfo. dwNumberOfProcessors; i**) 
{ 
HANDLE ThreadHandle; 


// 创 建 一 个 服务 器 的 工作 线程 
// 并 将 完成 端口 传递 到 该 线程 
ThreadHandle = CreateThread(NULL, 0, ServerWorkerThread, CompletionPort, 0, NULL); 
// 关 闭 线程 句柄 
CloseHandle( ThreadHandle); 
) 


// 步 骤 (4) 
// 创 建 一 个 监听 套 接 字 
Listen = WSASocket(AF INET, SOCK STREAM, 0, NULL, 0, WSA FLAG OVERLAPPED); 


InternetAddr.sin family - AF INET; 

InternetAddr.sin addr.s addr - htonl(INADDR ANY); 
InternetAddr.sin port - htons(5150); 

bind(Listen, (PSOCKADDR) &InternetAddr, sizeof(InternetAddr)); 
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// 开 始 监 听 


listen(Listen, 5); 


while( TRUE) 
{ 
PER HANDLE DATA * PerHandleData = NULL; 
SOCKADDR IN saRemote; 
SOCKET Accept; 
int RemoteLen; 


// 步 骤 (5) 

// 接 受 客户 机 连接 

RemoteLen = sizeof(saRemote); 

Accept = WSAAccept(Listen, (SOCKADDR * )&saRemote, &RemoteLen); 


// 步 又 (6) 
// 创 建 用 来 和 套 接 字 关联 的 数据 结构 
PerHandleData = (LPPER HANDLE DATA)GlobalAlloc(GPTR, sizeof(PER HANDLE DATA)); 


printf("Socket number % d connectedin", Accept); 
PerHandleData -> Socket = Accept; 
memcpy(&PerHandleData -> ClientAddr, &saRemote, RemoteLen); 


// 步 骤 (7) 
// 将 套 接 字 和 完成 端口 关联 起 来 
CreateloCompletionPort((HANDLE) Accept, CompletionPort, (DWORD) PerHandleData, 0); 


// 步 骤 (8) 
// 开 始 在 套 接 字 上 处 理 1/0 
[HEMER 1/0, 在 套 接 字 上 投递 一 个 或 多 个 WSASend 或 WSARecv 调用 
WSARecv(...); 
) 


DWORD WINAPI ServerWorkerThread(LPVOID lpParam) 
( 

// 工 作 线程 的 内 容 将 在 后 面 讨论 
) 


3. 完成 端口 实例 


程序 2.15 演示 了 如 何 使 用 1/0 完成 端口 开发 一 个 简单 的 WinSock 回声 服务 器 ,应 用 
程序 监听 端口 5150 的 TCP 连接 ,并 将 收 到 的 客户 机 数据 回 送 给 客户 机 。 
程序 2.15 用 完成 端口 开发 回声 服务 器 完整 代码 


//1/0 完成 端口 服务 器 程序 

// 程 序 名 : IOComplete.cpp 

# include < winsock2. h> 

# include < windows. h> 

# include < stdio. h> 

# pragma comment( lib, "ws2_32. lib") 
# define PORT 5150 
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# define DATA BUFSIZE 8192 


// 类 型 定义 
typedef struct 
t 
OVERLAPPED Overlapped; 
WSABUF DataBuf; 
CHAR Buffer[DATA BUFSIZE]; 
DWORD BytesSEND; 
DWORD BytesRECV; 
) PER IO OPERATION DATA, * LPPER IO OPERATION DATA; 


// 结 构 定义 
typedef struct 
{ 
SOCKET Socket; 
) PER HANDLE DATA, * LPPER HANDLE DATA; 


// 原 型 声明 
DWORD WINAPI ServerWorkerThread(LPVOID CompletionPortID); 


int main(int argc, char ** argv) 
{ 
SOCKADDR_IN InternetAddr; 
SOCKET Listen; 
HANDLE ThreadHandle; 
SOCKET Accept; 
HANDLE CompletionPort; 
SYSTEM INFO SystenInfo; 
LPPER HANDLE DATA PerHandleData; 
LPPER IO OPERATION DATA PerloData; 
int i; 
DWORD RecvBytes; 
DWORD Flags; 
DWORD ThreadID; 
WSADATA wsaData; 
DWORD Ret; 


if ((Ret = WSAStartup((2,2), &wsaData)) != 0) 

t 
printf("WSAStartup() failed with error % d\n", Ret); 
return 1; 


) 


else 
printf("WSAStartup() is OK! Vn") ; 


// 设 置 一 个 1/0 完成 端口 
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if ((CompletionPort = CreateloCompletionPort(INVALID HANDLE VALUE, NULL, O0, 0)) == NULL) 


{ 


printf("CreateloCompletionPort() failed with error * d\n", GetLastError()); 


return 1; 
) 
else 
printf("CreateloCompletionPort() is damn OK! n") ; 
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// 测 试 系统 中 有 多 少 CPU 处 理 器 
GetSystemInfo(&SystemInfo); 


// 基 于 系统 可 用 的 处 理 器 创建 工作 线程 
// 为 每 个 处 理 器 创建 两 个 线程 
for(i = 0; i« (int)SystemInfo.dwNumberOfProcessors * 2; i++) 
{ 
// 创 建 一 个 服务 器 工作 线程 ,并 且 传 递 一 个 完成 端口 给 这 个 线程 
if ((ThreadHandle = CreateThread (NULL, 0, ServerWorkerThread, CompletionPort, 0, 
&ThreadID)) == NULL) 
{ 
printf("CreateThread() failed with error % d\n", GetLastError()); 
return 1; 
} 
else 
printf("CreateThread() is OK! An"); 


// 关 闭 线程 句柄 
CloseHandle(ThreadHandle) ; 


) 


// 创 建 服务 器 监听 套 接 字 
if ((Listen = WSASocket(AF INET, SOCK STREAM, 0, NULL, 0, WSA FLAG OVERLAPPED)) == INVALID 
. SOCKET) 
t 
printf("WSASocket() failed with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("WSASocket() is OK! Wn"); 


InternetAddr.sin family - AF INET; 
InternetAddr.sin addr.s addr = htonl(INADDR ANY); 
InternetAddr.sin port = htons(PORT); 


if (bind(Listen, (PSOCKADDR) &InternetAddr, sizeof(InternetAddr)) -- SOCKET ERROR) 
{ 
printf("bind() failed with error * d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("bind() is fine! Wn"); 


// 开 始 监听 

if (listen(Listen, 5) == SOCKET ERROR) 

{ 
printf("listen() failed with error % d\n", WSAGetLastError()); 
return 1; 

} 

else 


printf("listen() is working...\n"); 


// 接 受 连接 并 且 交 给 完成 端口 处 理 
while(TRUE) 
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if ((Accept = WSAAccept(Listen, NULL, NULL, NULL, 0)) == INVALID_SOCKET) 
{ 
printf("WSAAccept() failed with error % d\n", WSAGetLastError()); 
return 1; 
) 
else 
printf("WSAAccept() looks fine! Vn"); 


// 为 套 接 字 分 配 内存 
if ((PerHandleData = (LPPER HANDLE DATA) GlobalAlloc(GPTR, sizeof(PER HANDLE DATA))) 


printf("GlobalAlloc() failed with error % d\n", GetLastError()); 
return 1; 


) 


else 
printf("GlobalAlloc() for LPPER HANDLE DATA is OK!in"); 


// 将 套 接 字 与 完成 端口 关联 起 来 
printf("Socket number % d got connected...\n", Accept); 
PerHandleData -> Socket = Accept; 


if (CreateloCompletionPort((HANDLE) Accept, CompletionPort, (DWORD) PerHandleData, 0) == NULL) 
{ 
printf("CreateloCompletionPort() failed with error * d\n", GetLastError()); 
return 1; 
) 
else 
printf("CreateloCompletionPort() is OK! n"); 


// 创 建 一 个 1/0 套 接 字 信息 结构 体 ,为 下 面 调用 的 WSARecv 函数 服务 
if ((PerIoData = (LPPER IO OPERATION DATA) GlobalAlloc(GPTR, sizeof(PER IO OPERATION 
DATA))) -- NULL) 
{ 
printf("GlobalAlloc() failed with error % d\n", GetLastError()); 
return 1; 


) 


else 
printf("GlobalAlloc() for LPPER IO OPERATION DATA is OK! n"); 


ZeroMemory(&(PerloData -> Overlapped), sizeof(OVERLAPPED)); 
PerIoData -> BytesSEND = 0; 

PerIoData -> BytesRECV = 0; 

PerIoData -> DataBuf.len = DATA BUFSIZE; 

PerIoData -> DataBuf. buf = PerIoData -> Buffer; 


Flags = 0; 
if (WSARecv (Accept, &(PerloData - > DataBuf), 1, &RecvBytes, &Flags, &(PerloData - > 
Overlapped), NULL) -- SOCKET ERROR) 
{ 
if (WSAGetLastError() !- ERROR IO PENDING) 


t 
printf("WSARecv() failed with error * din", WSAGetLastError()); 
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return 1; 


} 
else 
printf("WSARecv() is OK!\n"); 
) 
)//end nain 


DWORD WINAPI ServerWorkerThread(LPVOID CompletionPortID) 
( 

HANDLE CompletionPort - (HANDLE) CompletionPortID; 

DWORD BytesTransferred; 

LPPER HANDLE DATA PerHandleData; 

LPPER IO OPERATION DATA PerloData; 

DWORD SendBytes, RecvBytes; 

DWORD Flags; 


while(TRUE) 
{ 
if (GetQueuedCompletionStatus(CompletionPort, &BytesTransferred, 
(LPDWORD)&PerHandleData, (LPOVERLAPPED * ) &PerIoData, INFINITE) == 0) 
t 
printf("GetQueuedCompletionStatus() failed with error % d\n", GetLastError()); 
return 0; 
) 
else 
printf("GetQueuedCompletionStatus() is OK! Vn") ; 


// 检 查 套 接 字 是 否 发 生 了 错误 ,如 果 发 生 了 错误 ,关闭 套 接 字 并 释放 相关 内 存 
if (BytesTransferred == 0) 
{ 
printf("Closing socket % din", PerHandleData -> Socket); 
if (closesocket(PerHandleData 一 > Socket) -- SOCKET ERROR) 
{ 
printf("closesocket() failed with error % d\n", WSAGetLastError()); 
return 0; 
) 
else 
printf("closesocket() is fine! Wn"); 


GlobalFree(PerHandleData); 
GlobalFree(PerloData); 
continue; 


) 


// 如 果 BytesRECV 字段 等 于 0, 表 示 一 个 WSARecv 调用 刚刚 完成 
if (PerIoData 一 > BytesRECV -- 0) 
t 
PerloData -> BytesRECV = BytesTransferred; 
PerloData -> BytesSEND = 0; 
} 


else 


{ 
PerloData 一 > BytesSEND + = BytesTransferred; 
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} 


证 (PerIoData — > BytesRECV > PerloData — > BytesSEND) 


t 
// 调 用 WSASend() 发 送 ,直到 所 有 收 到 的 字 节 被 发 送 
ZeroMemory( &( PerIoData — > Overlapped), sizeof(OVERLAPPED)); 
PerloData 一 > DataBuf.buf = PerIoData 一 > Buffer + PerIoData 一 > BytesSEND; 
PerIoData 一 > DataBuf.len = PerIoData 一 > BytesRECV — PerIoData 一 > BytesSEND; 
if (WSASend(PerHandleData 一 > Socket, &(PerIoData -> DataBuf), 1, &SendBytes, 0, 
&(PerloData -> Overlapped), NULL) == SOCKET ERROR) 
t 
if (WSAGetLastError() != ERROR_IO_PENDING) 
{ 
printf("WSASend() failed with error % d\n", WSAGetLastError()); 
return 0; 
j 
) 
else 
printf("WSASend() is OK! Vn") ; 
) 
else 
{ 
PerIoData 一 > BytesRECV = 0; 
// 现 在 没有 多 余 的 数据 可 以 发 送 ,发 出 另外 一 个 WSARecv( ) 请 求 
Flags = 0; 
ZeroMemory(&(PerloData — > Overlapped), sizeof(OVERLAPPED)); 
PerloData - > DataBuf.len = DATA BUFSIZE; 
PerloData -> DataBuf.buf = PerloData- > Buffer; 
if (WSARecv(PerHandleData - > Socket, &(PerloData 一 > DataBuf), 1, &RecvBytes, &Flags, 
&(PerloData -> Overlapped), NULL) == SOCKET ERROR) 
{ 
if (WSAGetLastError() != ERROR IO PENDING) 
{ 
printf("WSARecv() failed with error % d\n", WSAGetLastError()); 
return 0; 
} 
} 
else 
printf("WSARecv() is OK!\n"); 
) 


) 

) 

编译 运行 程序 ,其 测试 步骤 如 下 : 

(1) 启动 服务 器 ,图 2. 33 是 服务 器 启动 后 的 初始 运行 
界面 ,显示 了 服务 器 的 运行 状态 。 

(2) 配合 服务 器 程序 进行 测试 的 客户 端 仍 用 前 面 实 现 图 2.33 完成 端口 服务 器 启动 后 
的 TcpClient 程序 启动 客户 机 ,输入 以 下 命令 : 的 初始 运行 界面 
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Tcpclient 一 p:5150 一 s:localhost -n:2 


js Ta wu sbs nimuy Aw ta s. ipi iii pain 


A test message fron client” 


图 2.34 TcpClient 客户 机 连接 服务 器 的 运行 界面 图 2.35 完成 服务 器 响应 客户 机 后 的 界面 


2.5.7 VO 模型 的 选择 


本 节 介绍 的 6 个 WinSock 1/0 开发 模型 有 Blocking I/O,select 1/0, WSAAsyncSelect 
I/O, WSAEventSelect I/O,Overlapped 1/0 以 及 I/O Completion Port ,在 实践 中 应 该 如 何 
选择 ? S s 型 都 有 其 优 缺 点 ,都 有 其 适用 的 领域 ,套用 一 句 俗语 ,“ 没 有 最 好 ,适合 就 好 ” 

- 般 来 讲 , 客 户 机 和 服务 器 的 应 用 需求 是 不 同 的 ,因此 在 开发 模型 的 选择 上 也 应 遵循 不 同 的 
策略 。 


1. 客户 机 


如 果 客 户 机 管理 较 少 的 套 接 字数 量 ,那么 select 1/0 BE , WSAAsyncSelect 1/0 模型 、 
WSAEventSelect 1/0 EU E 1/O 模型 都 可 胜任 。 如 果 开 发 以 窗 体 为 基础 的 应 用 程序 ， 
需要 进行 窗口 消息 管理 时 , WSAAsyncSelect L/O 模型 可 能 是 最 佳 选 择 。 如 果 对 客户 机 的 
性 能 要 求 较 高 ,WSAEventSelect I/O EU ER I/O 模型 为 较 好 的 选择 。 


2. 服务 器 


对 于 服务 器 的 I/O 模型 ,在 实践 中 一 般 在 重 琶 I/O 模型 和 T/O 完成 端口 模型 之 间 进 行 
选择 ,在 服务 器 负载 不 大 时 可 以 优先 考虑 重 倒 IO 模型 。 如 果 服 务 器 需要 为 大 量 并 发 IO 
请 求 服务 ,应 考虑 使 用 1/O 完成 端口 模型 ,以 获得 最 佳 性 能 。 因 为 如 果 用 重 番 I/O 模型 ， 
会 受到 64 个 Event 等 待 上 限 的 限制 ,这 意味 着 在 一 个 线程 内 部 ， 


WaitForMultipleEvents() 
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最 多 只 可 以 同时 监控 64 4° E ë 1/O 操作 的 完成 状态 ,如 果 使 用 多 线程 方式 来 满足 6400 个 
连接 请 求 ,系统 就 需要 开设 100 个 线程 为 之 服务 ,而 维护 线程 之 间 的 切换 将 极 大 地 影响 系统 
的 运行 效率 。 

就 目前 实际 应 用 情况 来 看 ,完成 端口 是 Windows 下 性 能 最 好 的 1/0 模型 。 大 型 MMO 
游戏 .大 型 IM 即时 通信 、 实 时 通信 和 企业 管理 等 并 发 量 大 的 应 用 系统 基本 上 都 采用 了 完成 
端口 模型 。 完 成 端口 提供 了 最 好 的 伸缩 性 ,往往 可 以 使 系统 达到 最 好 的 性 能 , 它 是 处 理 成 千 
上 万 套 接 字 的 首选 。 


ELE 


. 窗 体 编程 与 控制 台 编 程 有 何不 同 ? 
. 简 述 创建 一 个 窗 体 程序 的 基本 步骤 。 
. 什么 是 窗 体 回调 函数 ? 简 述 Windows 消息 驱动 机 制 。 
. WinSock2 API 与 操作 系统 有 什么 关系 ? 
. MÆ WinSock2 API 编程 基本 模型 。 
. 在 VS2010 中 创建 WinSock2 程序 的 基本 步骤 有 哪些 ? 需要 包含 和 链接 哪些 文件 ? 
. 什么 是 阻塞 套 接 字 编 程 ?什么 是 非 阻 塞 套 接 字 编程 ?y 各 有 何 特点 ? 
. 简 述 阻塞 套 接 字 客户 机 的 编程 步骤 , 简 述 非 阻 塞 套 接 字 客 户 机 的 编程 步骤 。 二 者 有 
何不 同 ? 

9. 简 述 阻塞 套 接 字 服务 器 的 编程 步骤 , 简 述 非 阻塞 套 接 字 服 务 器 的 编程 步骤 。 二 者 有 
何不 同 ? 

10. 简 述 套 接 字 编 程 的 错误 处 理 方法 。 

11. 什么 是 异步 套 接 字 ? 

12， 简 述 异 步 套 接 字 客户 机 的 编程 步骤 。 

13. 简 述 异步 套 接 字 服 务 器 的 编程 步 又。 

14. 列举 几 个 服务 器 响应 多 客户 机 并 发 连接 的 例子 ,归纳 几 种 服务 器 处 理 并 发 连接 的 
Jrik. 

15. 简 述 select L/O 模型 的 优 缺点 和 服务 器 编程 步骤 。 

16. 简 述 WSAAsyncSelect I/O 模型 和 WSAEventSelect I/O 模型 的 异同 。 

17. 简 述 WSAAsyncSelect L/O 模型 的 编程 步骤 。 

18. 简 述 WSAEventSelect I/O 模型 的 编程 步骤 。 

19. 简 述 Overlapped L/O 模型 的 编程 步骤 。 

20. 简 述 I/O Completion Port 模型 的 编程 步骤 。 


oo — O ch = GQ t = 


MFC 套 接 字 编 程 | 


用 WinSock2 API 编程 ,编程 者 需要 较 多 地 关心 窗 体 的 创建 控件 的 添加 、Windows iH 
息 处 理 逻辑 等 ,编程 工作 量 较 大 ,编程 效率 通常 不 及 MFC。 但 其 优点 也 很 明显 ,“ 万 丈 高 楼 
平地 起 ”, 这 种 直接 基于 操作 系统 APT 开发 的 程序 有 更 好 的 执行 效率 和 设计 灵活 性 ,是 开发 
系统 级 网 络 工具 的 不 二 选择 。 

MFC(Microsoft Foundation Classes, 微 软 基础 类 库 ) 是 将 Windows API 封装 成 为 大 量 
的 C++ 基础 类 并 以 C++ 库 的 方式 供 程 序 员 使 用 的 面向 对 象 的 开发 框架 。MFC 带 来 的 好 处 
是 ,帮助 程序 员 完 成 使 用 SDK 编程 时 的 费时 费力 的 工作 ,让 程序 员 站 在 更 高 的 起 点 ,将 更 多 
的 精力 投入 到 业务 逻辑 开发 而 不 是 界面 构建 , 极 大 地 减轻 了 Windows 编程 负荷 。 

对 于 MFC 的 威力 ,初学 者 感受 颇 深 的 是 用 “三 招 两 式 ” 即 可 成 就 一 个 类 似 Windows 记 
事 本 那样 的 强大 程序 ,充分 体验 到 了 “站 在 巨人 肩膀 上 ”的 快乐 。 


6.1 MFC 套 接 字 编程 模型 


MFC 的 体系 结构 很 精炼 ,为 编写 网 络 通信 程序 只 提供 了 两 种 模型 ,内 舱 在 
CAsyncSocket 和 CSocket 两 个 MFC 类 中 。 所 以 ,学 习 MFC 套 接 字 编 程 ,都 是 从 这 两 个 类 
入 手 的 。 


3.1.1 MFC 编程 框架 


URKE IREI. 虽然 MEC 只 提供 了 两 个 套 接 字 类 ,但 是 用 户 了 解 MFC 的 
整体 编程 框架 还 是 非常 必要 的 。 在 此 以 Visual C++ 2010 所 带 的 MFC 10. 0 为 例 ,其 完整 的 
类 图 结构 层次 如 图 3. 1 一 图 3. 3 Bros ,图 中 带 星 号 雄 的 类 为 从 MFC 9. 0 版 开始 增加 的 新 
类 , 带 萎 形 符号 合 的 类 为 MFC 10. 0 增加 的 新 类 。 这 3 张 图 可 谓 纲 举目 张 .层次 分 明 ,系统 
地 展示 了 MFC 类 库 中 各 类 间 的 组 织 结构 和 组 织 关系 ,是 基于 MFC 编程 的 导航 指南 。 

图 3.1 给 出 了 基于 CObject 类 派生 的 MFC 子 类 。CObject 是 多 数 MFC 类 的 根 类 ， 
MFC 也 有 一 部 分 类 不 是 派生 自 CObject, 见 图 3. 3。 


1. 几 个 重要 的 类 


CObject 类 下 面 有 一 个 重要 的 类 一 一 CCmdTarget. 它 是 描述 应 用 程序 结构 的 基 类 。 
CCmdTarget 类 下 面 的 CWinThread, CDocument, CDocTemplate 和 CWnd 子 类 用 于 描述 
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[CObject ] 
Database Support(DAO) File Services Arrays 
CDaoDatabase -CFile ] HCArray(template) 
HCDaoQueryDef CMemFile ] 上 [CEByteAray 
CDaoRecordset CSharedFile ] 上 CDWordArray 
CDaoTableDef COleSueamFile |] 上 [CObArray 
HCDao Workspace Eee ] HEPrAray 
Database Support(ODBC) ze ] 上 [CSeingAray 
HCDatabase CSocketFile ] HeEUInmAmay 
| [sone | | [CWOrdAriy S| 
HCLongBinary —[CInternetFile ] Command Line 
Menus -[CGopherFile |  |-[CCommandLinelnfo |] 
HCMenu CHttpFile ] Lists 
Graphical Drawing Internet Services 
L[CDC L-[CinternerSession — ] 
CClientDC r-[CInternetConnection — ] [cobi ^ $1] 
[CMeuFÜeDC | L[CFipConnecion — |] 
—[CPaintDC. r-[CGopherConnection Maps 
CWindowDC —[cHttpConnection CMap(template) 
Graphical [CFileFind C 站 | [CMapWordToPtr — ] 
Drawing Objects H CFipFileFind CMapPtrToWord 
—[CGdiObect | L[CGopherFileFind — ] |-|C MapPtrToPtr 
EE L (especies 
euis —1 Exceptions CMapWordToOb 
HiBu ^ 1] CException [CMapStingToPr — | 
HCFont | CMapStringToOb 
HCPalette HCDaoException ] [CMapStringToString | 
HCPen CDBException 
—[CRng. I-[CFileException ] Œ: 其 他 派生 自 CObject 的 
Control Support EX 
B LLL — 


图 3.1 基于 CObject 类 派生 的 MFC 类 


应 用 程序 框架 。 应 用 程序 类 CWinApp 派生 自 CWinThread 类 ,间接 地 继承 了 
CCmdTarget。CWnd 的 子 类 CFrameWnd、CDialog、CView 和 各 种 Controls 描述 Windows 
可 见 窗口 ,包括 主 窗口 、 子 框 窗口 .对话 框 ,视图 窗口 和 控件 。 这 些 继承 关系 见 图 3. 2。 


2. JLA MFC X: fF 


。 stdafx. h: 该 文件 用 来 作为 预 编 译 头 文件 ,内 部 包含 其 他 的 MFC 头 文件 。 

。 afxwin. h: MFC 程序 需要 载 和 人 它 ,因为 afxwin. h 及 其 所 包含 的 文件 声明 了 所 有 的 
MFC 类 。 此 文件 内 包含 afx. h.afx. h 包含 afxver_. h,afxver_.h 包含 afxv_w32. h, 
afxv_w32.h 包含 windows. h。 

° afxext. h: 使 用 工具 栏 ,状态 栏 的 程序 需要 包含 此 文件 。 
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Application Architecture 


{CCmdTarget 
CommandTargets j Synchronization 
CDocTemplate CDocument CSyncObject 
CSingleDocTemplate 上 CHtmlEditDoc CCriticalSection 
CMultiDocTemplate —[COleDocument |-[ CEvent 
-[CMultiDocTemplateExx | K —— CMutex 
CWinThread COleServerDoc ] CSemaphore 
CWinApp ——— Windows Sockets 
[COleControlModule — ] CRichEditDoc CAsyncSocket 
CWinAppExX CSocket 
Window Support 
{EWnd 
Controls Dialog Boxes Frame Windows 
CButton | as CFrameWnd 
CBitmapButton CCommonDialog [CFrameWndEx x | 
CMFCButton 太 HCColorDialog | [CMDIChildWnd | 
[CBitmapButton 太 — ] -[CFileDialog 
[CMECColorButtons | [CMiDIFameWad ] 
CSplitButton L[ CFindReplaceDialog 
ennaloe CMiniFrameWnd 
H[COleDialog T — — 
CComboBoxEx r — pamm 
SEE 
CDateTimeCtrl -[cPümDidog ^ ] Views 
CDateTimeCtrlImpl £ ] | CDialogEx X CView 
[- |] ET CCtrlView 
EE CDHtmiDialog -[cEdiView — ] 
HE CMultiPageDHtmlDialog H CListView 
-[CMFCMaskedEditk Windows Forms I—ERichEditView | 
CLisCUl CWinFormsDialog —[CTreView — ] 
CMFCLisiCulk Css 
iE: 其 他 派生 自 CCmdTarget 和 CWnd 的 类 省 略 - TA 
CTableView 女 
CWinFormsView 


图 3.2 基于 CCmdTarget 和 CWnd 类 派生 的 MFC 类 


第 3 章 “MFC 套 接 字 编 程 


。 afxdlgs. h: 使 用 通用 型 对 话 框 (Common Dialog) 的 MFC 程序 需要 包含 此 文件 。 
。 afxsock. h: MFC 套 接 字 扩 展 。MFC 通过 afxsock. h 来 引用 WinSockl. 1 并 提供 了 


一 些 面向 对 象 的 封装 。 
不 从 CObject 派 生 的 类 
Control/Support Classes Data Types(Simple Value) Run-Time Object 
[CCmaut [CFilerime Model Support 
CMFCRibbonCmdUI x] [CFileTimeSpan CArchive 
二 [colecmdul eme CDumpContext 
[CDataExchange GASES CRuntimeClass 
[CIRC [CE sringsupon 
[CDaoFieldExchange |] [Gea] [CFixedStringLog 
CDialoglmpl [Csize [CFedSwimMer — 1] 
[CFieldExchange — ] [Gas [ChraiscRT — | 
Clmage Gi [CSimplestingT — |] 
CMenuHash £ DHTML Support CStringT 
CMenulmages [CDHimiControlSink — | 
CWaitCursor [— | StrTraitMFC 
Frame Windows Support [StrTraitMFC_DLL | 
Controls [cramempk — 7] Synchronization/ 
CPrintDialogEx 3 [CrulSereenimpl — ] Thread Support. 
Helper Template Helper Classes [CProcessLocalObject | 
CEmbeddedButActsLikePtr. CGlobalUtils £ H CProcessLocal 
Registry Support [cMembC* | [CMutibok ] 
Ca E CThreadLocalObject 
State Support Stream Support [CThreadLocal — ] 
CMFCReBarState 大 [CSingeLok —  ] 
ChiTraitsCRT CAS am i 
ip: 其 他 类 省 略 。 


图 3.3 不 从 CObject 派 生 的 MFC 类 


3. 程序 入 口 WinMain 和 窗口 过 程 WndProc 


MFC 类 封装 了 Windows API, 所 以 ,在 MFC 程序 中 看 不 到 程序 入 口 函 数 WinMain 和 
窗口 回调 函数 WndProc。 3# 3: E. MFC 把 WinMain 函数 封装 在 WinApp 类 中 ,把 
WndProc 函数 封装 在 CFrameWnd 类 中 。 也 就 是 说 ,CWinApp 代表 程序 本 体 ,CFrameWnd 
代表 一 个 主 窗口 (Frame Window). 

WndProc 是 用 来 处 理 窗口 消息 的 函数 ,那么 在 CFrameWnd 类 中 它 是 如 何 实现 的 呢 ? 
首先 在 主 窗 口头 文件 中 (如 程序 3. 1 中 的 ClientDlg. h) 定 义 要 处 理 的 消息 (DECLARE_ 
MESSAGE_MAP) ,然后 在 主 窗口 源 文件 中 (如 程序 3. 1 中 的 ClientDlg. cpp) 定 义 该 类 的 
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消息 实现 (BEGIN_MESSAGE_MAP、END_MESSAGE_MAP)。 参 见 程序 3. 1 中 的 相关 
编码 。 


4. CObject 直接 派生 的 子 类 


读者 从 图 3. 1 可 以 看 出 ,直接 由 CObject 派生 的 子 类 较 多 ,几乎 占 了 MFC 类 的 一 半 以 
上 ,大 多 可 以 归 为 控件 类 型 或 组 件 类 型 ,这 些 子 类 往往 代表 程序 中 某 一 相对 独立 或 相对 完整 
的 组 成 元 素 。 由 CObject 派生 的 常用 子 类 可 以 归 为 以 下 几 种 类 型 。 

(1) 控件 支持 类 : 如 CImageList 等 。 

(2) DAO 数据 源 支 持 类 : 如 CDaoWorkspace、CDaoDatabase、CDaoQueryDef、 
CDaoTableDef .CDaoRecordset , CDaoException 等 。 

(3) ODBC 数据 源 支 持 类 : 如 CDatabase、CRecordset、CLongBinary 等 。 

(4) 菜单 支持 类 : 如 CMenu 等 。 

(5) 文件 支持 类 : 如 CFile, CMemFile, CSocketFile,CStdioFile,CInternetFile, CHttpFile 等 。 

(6) 绘图 设备 支持 类 : 如 CDC,CClientDC, CMetaFileDC , CPaintDC , CWindowDC ^f 

CD 绘图 工具 支持 类 : 如 CBitmap,CBrush,CFont,CPalette,CPen 等 。 

(8) Internet 服务 类 : 如 ClnternetSession, CInternetConnection, CFtpConnection, 
CHttpConnection, CFileFind, CFtpFileFind 45 , 

(9) 数据 结构 类 : 如 数组 类 中 的 CArray.CByteArray.CWordArray.CStringArray 等 ; 列表 
类 中 的 CList、CStringList 等 ; 映射 类 中 的 CMap、CMapStringToString .CMapStringToOb 等 。 

(10) 异常 处 理 类 ; 如 CException, CArchiveException, CDaoException, CDBException , 
CFileException, CInternetException 等 。 


5. CCmdTarget 和 CWnd 子 类 


图 3. 2 给 出 了 基于 CCmdTarget 和 CWnd 派生 的 MFC 类 ,侧重 于 描述 构成 程序 整体 
框架 和 主体 结构 的 类 及 其 关系 。 

1) CCmdTarget 子 类 

读者 从 图 3. 2 可 以 看 到 ,MFC 定义 了 两 个 套 接 字 类 CAsyncSocket 和 CSocket 封装 
WinSock2 API.CAsyncSocket 是 CCmdTarget 的 子 类 ,CSocket 是 间接 子 类 。 这 两 个 类 构 
成 了 MFC 套 接 字 通 信 的 基本 编程 框架 。 

CSyncObject, CCriticalSection, CEvent, CMutex, CSemaphore 是 CCmdTarget 的 子 类 
或 间接 子 类 ,构成 了 MFC 多 线程 同步 访问 的 基础 框架 。 

另外 两 个 重要 子 类 CDocument、CDocTemplate 构成 了 文档 处 理 的 编程 框架 。 
CWinThread 及 其 子 类 CWinApp 构成 了 应 用 程序 的 本 体 框 架 。 总 之 ,直接 由 CCmdTarget 
派生 的 子 类 或 间接 子 类 构成 了 应 用 程序 的 编程 主 框架 。 

2) CWnd F% 

CWnd 也 是 CCmdTarget 派生 的 子 类 ,主要 定义 窗 体 和 窗 体 元 素 ,CWnd 及 其 子 类 构成 
了 程序 的 界面 部 分 。 例如 ,定义 窗 体 框 架 的 类 有 CFrameWnd, CMDIFrameWnd, 
CMiniFrameWnd 等 ; 定义 对 话 框 的 类 有 CDialog, CDialogEx, CFileDialog 等 ; 定义 视图 的 类 
有 CView、CFormView、CListView、CEditView、CRichEditView、CTreeView .CTableView 等 ; 定 
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义 控件 的 类 有 CButton、CComboBox、CEdit、CListBox、CListCtrl 等 。 
6. 不 从 CObject 派生 的 MFC 类 


图 3.3 给 出 了 不 从 CObject 派生 的 MFC 类 ,这 些 类 比较 杂 , 大 多 是 为 了 满足 某 些 较 为 
独立 的 应 用 设计 的 。 例 如 CTime、 CFileTime, CPoint, CRect、 CImage, CWaitCursor、 
CMemDC ,CArchive 等 ,以 及 线程 同步 访问 类 CMultiLock,CSingleLock 等 。 


7. MFC 类 图 应 用 汇总 


图 3.1 一 图 3. 3 三 张 图 展示 的 内 容 确 实 很 多 ,如 果 按 照应 用 领域 进一步 总 结 , MFC 类 
的 整体 结构 可 以 进一步 归纳 为 图 3.4 所 示 的 树 形 目 录 。 


应 用 程序 结构 N Lis [一 图形 绘制 一 数组 
CCmdTarget 一 控件 支持 | 列表 
[一 图 形 绘制 对 象 一 映射 
窗口 支持 EE 
WES m L— Internetik 
w. Laa Lum. opecs 
| 一 DAO 数 据 库 支持 
| 一 控制 条 
[同步 
Miis L Windowst 


非 派生 自 CObject 的 类 
Intemet 服 务 器 API 结构 支持 类 


运行 库 对 象 模型 支持 简单 值 类 型 类 型 化 模板 集合 OLE 自 动 化 类 型 


图 3.4 MFC 分 类 框架 


在 开发 一 般 的 网 络 程序 的 过 程 中 .事实 上 并 不 需要 使 用 所 有 的 类 和 成 员 函 数 ,开发 人 员 只 
要 能 熟练 应 用 其 中 的 十 几 个 类 即 可 建立 较为 完善 的 程序 。 这 些 常 用 的 类 有 CObject、 
CCmdTarget , CWinThread, CWinApp, CWnd, CFrameWnd, CDialog, CView, CStatic, CButton, 
CListBox .CComboBox CEdit , CScrollBar , CAsyncSocket , CSocket , CArchive, CSocketFile 等 。 

总 之 ,MFC 封装 了 Win32 API, 提 供 了 更 高 级 别 的 接口 ,简化 了 Windows 编程 。 同 时 ， 
MFC 也 支持 对 底层 API 的 直接 调用 ,这 使 得 MFC 很 强大 。 


3.1.2 CAsyncSocket 类 编程 模型 


CAsyncSocket 类 是 从 MFC 的 根 类 CObject 派生 而 来 的 ,对 WinSock API 的 封装 是 简 
单 和 直接 的 ,类 中 的 成 员 函 数 在 形式 上 也 与 WinSock API 极 为 相似 。CAsyncSocket 类 在 
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Ne 


MFC 中 的 层次 关系 如 图 3. 5 所 示 。 


Application Architecture 


Windows Sockets 


图 3.5 MFC 套 接 字 类 的 继承 关系 
CAsyncSocket 类 的 成 员 定义 如 表 3. 1 所 示 。 
表 3.1 CAsyncSocket 类 的 定义 


构造 函数 

CAsyncSocket 创建 一 个 CAsyncSocket 类 对 象 

Create 创建 一 个 套 接 字 

属性 类 成 员 函 数 

Attach 将 套 接 字 句柄 关联 到 一 个 CAsyncSocket 类 对 象 上 
Detach 解除 套 接 字 和 CAsyncSocket 类 对 象 的 关联 
FromHandle 通过 套 接 字句 柄 返回 CAsyncSocket 类 对 象 指针 
GetLastError 返回 最 后 一 次 错误 的 错误 码 

GetPeerName 获取 一 个 已 经 建立 了 连接 的 套 接 字 对 应 的 远 端 主机 地 址 
GetPeerNameEx 获取 一 个 已 经 建立 了 连接 的 套 接 字 对 应 的 远 端 主机 地 址 (ITPv6) 
GetSockName 获取 套 接 字 的 本 地 名 称 

GetSockNameEx 获取 套 接 字 的 本 地 名 称 (针对 IPv6 地 址 族 ) 

GetSockOpt 获取 套 接 字 选项 值 

SetSockOpt 设置 套 接 字 选 项 值 

操作 类 成 员 函 数 

Accept 接受 连接 请 求 

AsyncSelect 选择 感 兴趣 的 事件 

Bind 将 套 接 字 和 本 地 端口 绑 定 

Close 关闭 套 接 字 

Connect 与 远 端的 套 接 字 建立 连接 

IOCtl 控制 套 接 字 的 工作 模式 

Listen 设置 套 接 字 处 于 侦 听 状态 ,等 待 客户 机 连接 

Receive 通过 当前 套 接 字 接 收 远 端 套 接 字 发 来 的 数据 
ReceiveFrom 从 数据 报 套 接 字 接 收 数据 及 获取 发 送 方 的 地 址 信息 
ReceiveFromEx 从 数据 报 套 接 字 接收 数据 及 获取 发 送 方 的 地 址 信息 (IPv6) 
Send 通过 当前 套 接 字 向 建立 连接 的 远 端 套 接 字 发 送 数据 
SendTo 向 指定 地 址 发 送 数 据 

SendToEx 向 指定 地 址 发 送 数 据 ( 针 对 IPv6 地 址 族 ) 

ShutDown 断 开 套 接 字 的 发 送 (Send) 或 接收 (Receive) 操 作 


Socket 定义 一 个 套 接 字 句柄 
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续 表 
可 重 载 的 事件 函数 
OnAccept 当 收 到 建立 连接 的 请 求 时 自动 调用 的 处 理 函 数 
OnClose 当 连 接 的 远 端 套 接 字 关闭 时 自动 调用 的 处 理 函 数 
OnConnect 当 连 接 函 数 返回 时 自动 调用 的 处 理 函 数 
OnOutOfBandData 当 一 个 接收 套 接 字 有 带 外 数据 可 读 时 自动 调用 的 处 理 函 数 
OnReceive 当 有 新 的 数据 到 达 时 自动 调用 的 处 理 函 数 
OnSend 当 有 数据 要 发 送 时 自动 调用 的 处 理 函 数 
操作 符 重 载 


operator 一 
operator SOCKET 


为 一 个 CAsyncSocket 对 象 赋值 
获取 CAsyncSocket 对 象 的 SOCKET 句柄 


数据 成 员 


m hSocket 


定义 CAsyncSocket 对 象 的 套 接 字句 柄 


K 3.2 给 出 了 利用 CAsyncSocket 类 在 客户 机 和 服务 器 编程 的 一 般 步骤 。 
表 3.2 客户 机 和 服务 器 使 用 CAsyncSocket 类 编程 的 步骤 对 照 


步骤 


服 务 器 


客 户 机 


1 


// 创 建 服务 器 侦 听 套 接 字 对 象 
CAsyncSocket sockListen; 


// 创 建 客户 机 套 接 字 对 象 
CAsyncSocket sockClient; 


// 创 建 SOCKET 句柄 , 绑 定 到 指定 端口 


sockListen. Create(nPort) ; 


// 创 建 SOCKET 句柄 ,自动 选择 本 地 可 用 端口 


sockClient. Create(); 


// 启 动 监听 ,时 刻 准 备 接受 客户 连接 请 求 


sockListen. Listen ; 


// 请 求 连接 到 服务 器 


sockClient. Connect(strAddr,nPort) ; 


// 创 建 一 个 新 的 服务 器 套 接 字 对 象 
CAsyncSocket sockServer; 


// 接 受 新 连接 
sockListen. Accept(sockServer) ; 
// 接 收 数据 // 发 送 数据 
sockServer. ReceiveC pBuf  nLen) ; sockClient. Send( pBuf  nLen) ; 
š 或 或 
// 发 送 数据 // 接 收 数据 
sockServer. Send( pBuf, nLen) ; sockClient. Receive( pBuf , nLen) ; 
或 两 者 或 两 者 
7 // 禁 用 服务 器 套 接 字 的 某 些 操作 // 禁 用 客户 机 套 接 字 的 某 些 操作 
sockServer. ShutDownO ; sockClient. ShutDownO ; 
8 // 关 闭 服务 器 套 接 字 // 关 闭 客 户 机 套 接 字 
sockServer. CloseO : sockClient. CloseO ; 
// 关 闭 服务 器 侦 听 套 接 字 


sockListen. CloseO ; 


3.1.3 CSocket 类 编程 模型 


CSocket 类 派生 自 CAsyncSocket ,提供 了 比 CAsyncSocket 类 抽象 级 别 更 高 的 套 接 字 
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支持 。CSocket 类 与 CSocketFile 类 和 CArchive 类 一 起 工作 完成 数据 收 / 发 的 协同 模型 如 
图 3.6 所 示 。 


客户 端 服务 器 
CArchive CSocketFile CSocket CSocket CSocketFile CArchive 


网 络 
发 送 数据 接收 数据 


CArchive CSocketFile CSocket CSocket CSocketFile CArchive 


144-211 


接收 数据 
图 3.6 CArchive,CSocketFile 和 CSocket 三 者 协同 工作 模型 


CSocketFile 类 从 CFile 派生 ,但 CSocketFile 类 并 不 支持 CFile 类 的 所 有 功能 。 
CSocketFile 对 象 与 CSocket 对 象 绑 定 ,建立 数据 传输 通道 。CArchive 不 能 绑 定 到 标准 的 
CFile 对 象 (CFile 通常 与 磁盘 文件 相关 联 ), 而 是 与 CSocketFile 对 象 绑 定 建立 数据 传输 
通道 。 

图 3.6 的 协同 模型 使 编程 者 不 必 管理 套 接 字 的 细节 ,只 要 创建 CSocket、CSocketFile 和 
CArchive 对 象 并 绑 定 三 者 之 间 的 关系 ,就 相当 于 创建 了 一 条 从 应 用 程序 直达 网 络 传输 层 的 
数据 通道 。 

这 里 打 一 个 比方 ,发 送 数据 时 ,程序 把 数据 交 给 ( 写 信 )CArchive ix [i KA 81", CCArchive 
“大 哥 ” 自 行 交 给 与 它 绑 定 的 CSocketFile* 二 哥 ”,CSocketFile“ 二 哥 ” 自 行 把 来 自 “ 大 哥 ” 的 数 
据 交 给 与 它 绑 定 的 CSocket“ 三 哥 ”,CSocket* 三 哥 " 再 交 给 网 络 传输 层 去 处 理 。 接 收 数据 是 
其 反方 向 操作 。 即 收 /发 数据 ,程序 只 跟 CArchive“ 大 哥 ” 打 交道 。 

CSocket 对 象 有 两 种 工作 状态 , 即 异步 ( 非 阻塞 ) 和 同步 (阻塞 )。 当 处 于 异步 ( 非 阻塞 ) 
状态 时 , 套 接 字 可 以 从 MFC 框架 接收 异步 通知 。 然 而 ,在 操作 过 程 中 接收 或 发 送 数据 时 ， 
套 接 字 又 会 临时 变 为 同步 (阻塞 ) 状 态 。 这 意味 着 在 同步 操作 (收发 数据 ) 完 成 之 前 , 套 接 字 
不 会 接收 异步 通知 。 

X 3.3 以 对 照 方式 描述 CSocket 类 在 服务 器 和 客户 机 的 编程 步骤 。 


表 3.3 使 用 CSocket 类 在 客户 机 和 服务 器 编程 的 步骤 对 照 


步骤 服 务 器 客户 机 
// 创 建 服务 器 侦 听 套 接 字 对 象 // 创 建 客户 机 套 接 字 对 象 
CSocket sockListen; CSocket sockClient; 
z // 创 建 SOCKET 句柄 , 绑 定 指定 端口 // 创 建 SOCKET 句柄 ,自动 选择 本 地 可 用 端口 
sockListen. Create(nPort) ; sockClient. CreateO ; 
a // 启 动 服务 器 端 侦 听 ,时刻 准备 接受 连接 
sockListen. ListenO ; 
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续 表 
步骤 服 务 器 客 户 机 
š // 向 服务 器 发 起 连接 请 求 
sockClient. Connect(strAddr, nPort) ; 
// 创 建 一 个 新 的 服务 器 套 接 字 对 象 
CSocket sockServer; 
// 接 受 客 户 机 连接 
sockListen. Accept( sockServer) ; 
6 // 创 建 一 个 与 套 接 字 关联 的 文件 对 象 // 创 建 一 个 与 套 接 字 关 联 的 文件 对 象 
CSocketFile file(& sockServer); CSocketFile file( &sockClient) ; 
// 在 服务 器 创建 与 套 接 字 文件 对 象 关联 的 | // 在 客户 机 创建 与 套 接 字 文 件 对 象 关 联 的 归档 对 
归档 对 象 , 用 于 输入 或 输出 象 ,用 于 输入 或 输出 
CArchive arIn(&file,CArchive: :load) ; CArchive arIn(&file,CArchive: :load) ; 
”| 或 或 
CArchive arOut( &file, CArchive: : store) ; CArchive arOut(8-file, CArchive: ; store) ; 
或 两 者 或 两 者 
// 使 用 归档 对 象 传输 数据 // 使 用 归档 对 象 传输 数据 
A arIn >> dwValue;// 读 取 数 据 arIn >> dwValue; // 读 取 数 据 
或 或 
arOut << dwValue;// 输 出 数据 arOut << dwValue; // 输 出 数据 
// 关 闭 服务 器 端 套 接 字 对 象 / /关闭 客户 机 套 接 字 对 象 
9 sockServer. CloseO ; 
2 sockClient. CloseO ; 
sockListen. CloseO ; 


在 此 需要 说 明 以 下 几 点 : 

(1) 表 中 的 nPort 是 端口 号 ,strAddr 是 IP 地 址 的 字符 串 形式 。 

(2) 创建 服务 器 套 接 字 时 必须 始终 指定 一 个 端口 ,以便 客户 机 可 以 连接 ,有 时 也 需要 指 
定 地 址 。 创 建 客户 机 套 接 字 时 使 用 默认 参数 ,表示 使 用 任何 可 用 端口 。 

(3) 在 服务 器 端 调用 Accept 时 ,需要 定义 一 个 新 套 接 字 对 象 以 接受 客户 机 连接 ,必须 
首先 创建 该 对 象 ,但 不 对 它 调 用 Create。 

(4) CArchive 和 CSocketFile 对 象 在 超出 作用 域 范围 时 将 被 关闭 。CSocket 对 象 在 超 
出 作用 域 范 围 或 被 删除 时 ,对 象 的 析 构 函数 将 对 此 套 接 字 对 象 调用 Close 成 员 函 数 。 

(5) 表 3.3 中 显示 的 调用 顺序 适用 于 流 式 套 接 字 。 数 据 报 套 接 字 是 无 连接 的 ,不 需要 
Connect,Listen 和 Accept 调用 。 如 果 使 用 CAsyncSocket 类 , 则 数据 报 套 接 字 使 用 
CAsyncSocket: :SendTo 和 ReceiveFrom 成 员 函 数 。CArchive 不 适用 于 数据 报 , 如 果 套 接 
字 用 数据 报 通信 , 则 不 要 使 用 CSocket。 如 果 想 将 CSocket 用 于 数据 报 套 接 字 ,必须 像 使 用 
CAsyncSocket 那样 使 用 该 类 , 即 不 与 CArchive 和 CSocketFile 协同 工作 。 因 为 数据 报 是 不 
可 靠 的 ,不 保证 安全 送 达 , 并 且 可 能 重复 或 顺序 不 对 ,它们 不 能 与 CArchive 的 序列 化 工作 模 
ER. 

(6) 创建 一 个 CSocketFile 对 象 ,将 CSocket 对 象 与 它 关联 起 来 。 

(7) 创建 一 个 CArchive 对 象 ,用 于 加 载 ( 接 收 ) 或 存储 (发 送 ) 数 据 。CArchive 对 象 与 
CSocketFile 对 象 相关 联 。 
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(8) 使 用 CArchive 对 象 在 客户 端 套 接 字 与 服务 器 套 接 字 之 间 传 递 数据 ,不 管 是 加 载 
(接收 ?还 是 存储 (发 送 ) ,给 定 的 CArchive 对 象 只 在 一 个 方向 上 传递 数据 , 故 一 般 需 要 使 用 
两 个 CArchive 对 象 ,一 个 用 于 发 送 数据 ,一 个 用 于 接收 数据 。 


3.1.4 派生 套 接 字 类 


编程 者 在 设计 项 目的 通信 方案 时 ,一 般 需要 根据 CAsyncSocket 或 CSocket 派生 自己 
的 套 接 字 类 ,通过 重 写 虚 成 员 函 数 OnReceive, OnSend, OnAccept, OnConnect 和 OnClose 
等 进行 功能 扩展 和 定制 。 

上 述 虚 函数 也 称 为 CAsyncSocket 和 CSocket 套 接 字 类 的 通知 函数 。 这 些 通知 函数 都 
是 回调 函数 ,MFC 框架 调用 它们 将 重要 事件 通知 给 套 接 字 对 象 。 这 些 通知 函数 的 含义 
如 下 。 


OnReceive: 通知 此 套 接 字 缓冲 区 中 有 需要 接收 的 数据 。 

OnSend; 通知 此 套 接 字 现在 可 以 发 送 数据 。 

OnAccept: 通知 此 侦 听 套 接 字 可 以 接受 挂 起 的 或 新 到 的 连接 请 求 。 
OnConnect: 通知 此 连接 套 接 字 其 连接 尝试 已 完成 ,可 能 成 功 ,也 可 能 存在 错误 。 
OnClose: 通知 此 套 接 字 它 连 接 的 远 端 套 接 字 已 关闭 。 

一 个 较为 特殊 的 通知 函数 是 OnOutOfBandData。 此 通知 函数 告诉 接收 套 接 字 、 发 送 套 
接 字 有 *“ 带 外 ”数据 要 发 送 。 带 外 数据 是 迎 辑 上 独立 的 通道 ,与 每 一 对 已 连接 的 流 式 套 接 字 
相关 联 。 带 外 通道 通常 用 于 发 送 “ 紧 急 ” 数 据 , MEC 套 接 字 支持 传递 带 外 数据 。 通 过 
CAsyncSocket 可 以 使 用 带 外 通道 ,但 对 于 CSocket 类 最 好 不 要 使 用 它 。 更 简便 的 方法 是 创 
建 男 一 个 套 接 字 来 传递 紧急 数据 。 

如 果 从 CAsyncSocket 类 派生 新 类 ,必须 为 新 类 感 兴 趣 的 网 络 事件 重 写 通知 函数 。 如 
JE. CSocket 类 派生 类 , 则 可 以 选择 是 否 重 写 感 兴 趣 的 通知 函数 。 在 不 重 写 CSocket 自身 
带 有 的 通知 函数 时 ,通知 函数 默认 不 执行 任何 操作 。 当 套 接 字 被 通知 有 感 兴趣 的 事件 (如 存 
在 要 读 取 的 数据 ) 时 ,通知 函数 就 会 自动 调用 执行 。 例 如 , 当 套 接 字 得 到 读 取 数 据 的 通知 时 ， 
OnReceive 会 自动 执行 ,可 在 OnReceive 函数 中 调用 Receive 方法 及 时 读 取 数据 。 


3.1.5 MFC 套 接 字 类 的 阻塞 / 非 阻塞 模式 


对 于 主机 字 节 顺序 和 网 络 字 节 顺 序 的 转换 以 及 阻塞 、 非 阻塞 等 问题 ,如 果 使 用 
CAsyncSocket 类 或 其 派生 类 ,需要 编程 者 亲自 编程 处 理 这 些 细节 问题 。 如 果 使 用 CSocket 
类 或 其 派生 类 , 则 不 需要 考虑 ,因为 CSocket 类 对 字 节 顺序 之 类 的 问题 自行 做 了 转换 和 

套 接 字 可 以 处 于 “阻塞 模式 ?或 * 非 阻塞 模式 ”。 当 处 于 阻塞 (或 同步 ) 模 式 时 , 套 接 字 的 
函数 必须 等 到 完成 自己 的 操作 才 返 回 。 例 如 ,对 Receive 成 员 函 数 的 调用 可 能 需要 任意 长 
的 时 间 才 能 完成 ,因为 它 要 等 待 发 送 应 用 程序 发 来 数据 (使 用 CSocket 或 使 用 带 阻 塞 的 
CAsyncSocket 即 如 此 )。 如 果 CAsyncSocket 对 象 处 于 非 阻 塞 模式 (异步 操作 ) ,调用 会 立即 
返回 ,而 当前 错误 码 (可 使 用 GetLastError 成 员 函 数 检索 ) 为 WSAEWOULDBLOCK, 它 指 
出 由 于 模式 的 原因 ,调用 车 不 立即 返回 将 阻塞 (CSocket 不 返回 WSAEWOULDBLOCK ,该 
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类 为 编程 者 自动 管理 阻塞 ) 。 

Win32 操作 系统 使 用 抢占 式 多 任务 处 理 技术 并 提供 多 线程 运行 方式 ,编程 者 应 该 将 套 
接 字 放 在 单独 的 工作 线程 。 线 程 中 的 套 接 字 可 以 在 不 妨碍 应 用 程序 其 他 活动 的 情况 下 阻 
塞 ,这 样 就 不 必 在 阻塞 上 花费 计算 时 间 了 。 

对 CAsyncSocket 应 避免 使 用 阻塞 操作 ,而 应 使 用 异步 操作 。 例 如 ,在 异步 操作 中 ,从 
调用 Receive 后 接收 到 WSAEWOULDBLOCK 错误 码 的 那 一 刻 开始 ,将 一 直 等 到 
OnReceive 成 员 函 数 被 调用 以 通知 用 户 可 以 再 次 读 取 。 

无 论 是 CAsyncSocket 还 是 CSocket, 通 过 回调 套 接 字 的 通知 函数 (例如 OnReceive) 来 
完成 异步 调用 的 机 制 被 广泛 地 应 用 于 编程 实践 。 

在 默认 情况 下 ,CAsyncSocket 支持 异步 调用 ,编程 者 必须 使 用 回调 通知 函数 自行 管理 
阻塞 。CSocket 类 是 同步 的 ,但 它 能 利用 Windows 消息 机 制 为 编程 者 管理 阻塞 。 


6.2 CAsyncSocket 类 编程 实例 


CAsyncSocket 类 封装 了 Windows Sockets API, 如 果 编 程 者 要 使 用 这 个 类 ,需要 了 解 
网 络 通信 细节 ,要 自行 负责 处 理 阻 塞 、. 字 节 顺 序 的 差异 以 及 Unicode 和 多 字 节 字符 集 
(MBCS) 字 符 串 之 间 的 转换 。 如 果 编 程 者 想 简化 这 些 问题 ,可 以 使 用 CSocket 类 。 

使 用 CAsyncSocket 对 象 ,需要 首先 调用 它 的 构造 函数 ,然后 调用 Create 函数 创建 底层 
套 接 字 句柄 (SOCKET 类 型 )。 对 于 服务 器 套 接 字 调用 Listen 函数 ,客户 机 套 接 字 调 用 
Connect 函数 。 服 务 器 套 接 字 侦 听 到 连接 请 求 后 ,调用 Accept 函数 。 


3.2.1 点 对 点 通信 功能 和 技术 要 点 


读者 还 记得 第 2 章 的 程序 2. 9 和 程序 2. 10 实现 的 点 对 点 通信 系统 吗 ? 通过 对 比 学 习 ， 
经 常 可 以 让 事情 事半功倍 ,请 读者 在 做 完 程序 3. 1 和 程序 3. 2 后 一 定 要 回头 进行 比较 。 

本 节 运用 MFC CAsyncSocket 类 设计 实现 一 个 简单 的 C/S 模式 的 点 对 点 通信 程序 , 客 
户 机 和 服务 器 程序 通过 网 络 交换 字符 串 信息 ,并 在 各 自 的 窗口 列表 中 显示 ,服务 器 只 支持 与 
一 个 客户 机 聊天 。 其 技术 要 点 如 下 : 

(1) 运用 VS2010 创建 MFC 客户 机 项 目 和 服务 器 项 目 , 理 解 MFC 编程 框架 ; 

(2) 从 CAsyncSocket 类 派生 自己 的 MFC EFX; 

(3) 理解 派生 的 MFC 套 接 字 类 与 MFC 框架 的 关系 ; 

(4) 重点 学 习 流 式 套 接 字 对 象 的 使 用 

(5) 处 理 网 络 事件 的 方法 。 


3.2.2 创建 客户 机 
编程 环境 使 用 VC++ 2010, 创 建 客户 机 的 步骤 如 下 。 


1. 使 用 MFC 应 用 程序 向 导 创 建 客户 机 程序 框架 
CD 启动 VS2010 ,选择 "文件 一 新 建 一 项 目 ” 命 令 , 弹 出 “新 建 项 目 ? 对 话 框 , 如 图 3.7 所 
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示 。 设 定 模板 为 MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名称 、 解 决 方案 名 称 为 Client, 并 
指定 项 目 保存 位 置 ,然后 单 击 “ 确 定 ” 按 钮 进入 MFC 应 用 程序 向 导 。 


EGET ou go > 二 
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3.7 新 建 客户 机 项 目 


(2) 在 MFC 应 用 程序 向 导 的 第 一 步 将 应 用 程序 类 型 设置 为 “基于 对 话 框 ”*, 如 图 3. 8 
所 示 。 
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图 3.8 设置 应 用 程序 类 型 


(3) 在 MFC 应 用 程序 向 导 的 第 二 步 设置 用 户 界 面 功 能 .保留 默认 值 , 如 图 3.9 所 示 。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 设置 高 级 功能 ,选择 “ Windows 套 接 字 ” 复 选 框 ,如 
图 3. 10 所 示 。 

(5) 在 MFC 应 用 程序 向 导 的 最 后 一 步 观察 生成 的 类 CClientApp 和 CClientDlg, 如 
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图 3.9 设置 用 户 界 面 
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图 3.10 设置 高 级 功能 
图 3.11 所 示 。 
(6) 单 击 “ 完 成 ”按钮 ,完成 应 用 程序 框架 的 创建 ,生成 的 解决 方案 如 图 3. 12 所 示 。 


2. 为 客户 机 对 话 框 添加 控件 ,构建 程序 主 界面 


在 资源 视图 中 展开 Dialog AWA H .双击 IDD_CLIENT_DIALOG ,在 工作 区 中 会 出 现 
一 个 对 话 框 ,借助 工具 箱 中 的 控件 将 程序 主 界面 设计 成 如 图 3. 13 所 示 的 布局 。 
图 3. 13 中 各 控件 的 定义 如 表 3.4 所 示 。 
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MFC 应 用 程序 向 导 — Client 
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图 3.12 项 目 创建 后 生成 的 解决 方案 


表 3.4 客户 机 主 对话 框 中 各 控件 的 属性 


图 3.11 由 向 导 生 成 的 类 


m 网 络 聊天 客户 机 


Manis. 
向 服务 器 发 送 消息 


图 3.13 客户 机 程序 主 对 话 框 布局 


控件 ID 控件 标题 控件 类 型 
IDC_EDIT_SERVERNAME 无 编辑 框 Edit Control 
IDC_EDIT_SERVERPORT 无 编辑 框 Edit Control 
IDC_EDIT_TOSERVER 无 编辑 框 Edit Control 
IDC_LIST_SENT 无 列表 框 List Box 
IDC_LIST_RECEIVED 无 列表 框 List Box 
IDC_BUTTON_CONNECT 连接 服务 器 按钮 Button Control 
IDC_BUTTON_DISCONNECT 断 开 连 接 按钮 Button Control 
IDC_BUTTON_SEND 向 服务 器 发 送 消息 按钮 Button Control 
IDC STATICI 服务 器 主机 名 : 静态 文本 Static Text 
IDC_STATIC2 服务 器 端口 : 静态 文本 Static Text 
IDC_STATIC3 对 服务 器 说 : 静态 文本 Static Text 
IDC_STATIC4 客户 机 已 经 说 过 的 话 : 静态 文本 Static Text 
IDC_STATIC5 来 自 服务 器 的 消息 : 静态 文本 Static Text 
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3. 为 对 话 框 中 的 控件 对 象 定义 相应 的 成 员 变 量 


在 解决 方案 资源 管理 器 中 的 项 目 名 称 Client 上 右 击 ,在 快捷 菜单 中 选择 “类 向 导 ” 命 令 ， 
进入 MFC 类 向 导 , 如 图 3. 14 所 示 。 


切换 到 ”成 员 变量 ”选项 卡 ,根据 表 3. 5 中 成 员 变 量 的 定义 ,用 “添加 变量 ”按钮 定义 成 员 
变量 。 图 3. 14 展示 的 是 为 文本 框 控件 IDC_EDIT_SERVERPORT 定义 成 员 变 量 。 
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图 3.14 用 MFC 类 向 导 为 控件 定义 成 员 变 量 
图 3. 15 显示 的 是 控件 成 员 变量 定义 完成 后 的 界面 。 
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MFC 类 向 导 会 自动 在 ClientDlg. h 和 ClientDlg. cpp 中 完成 变量 的 定义 和 初始 化 。 
表 3.5 为 CClientDlg 类 增加 控件 成 员 变量 


控件 ID 对 应 成 员 变量 名 称 变量 类 型 取 值 范围 
IDC_EDIT_SERVERNAME m strServerName CString 
IDC EDIT SERVERPORT m. nServerPort int 1024—49 151 
IDC EDIT TOSERVER m. strToServer CString 
IDC LIST SENT m listSent CListBox 
IDC LIST RECEIVED m listReceived CListBox 


4. 创建 从 CAsyncSocket 类 派生 的 子 类 CClientSocket ,处理 与 服务 器 的 通信 


(1) 客户 机 应 创建 自己 的 套 接 字 类 ,负责 与 服务 器 的 通信 。 这 个 套 接 字 类 应 当 从 
CAsyncSocket 类 派生 ,并 且 能 够 将 套 接 字 事件 传递 给 对 话 框 类 CClientDlg, 在 对 话 框 类 中 
编程 者 可 以 自 定义 套 接 字 事件 处 理 函 数 。 

在 图 3. 12 所 示 的 解决 方案 资源 管理 器 中 右 击 项 目 名 称 Client. fe Be bl SE rh Fen is 
加 一 类 ”命令 ,进入 MFC 添加 类 向 导 , 设 定 类 名 为 CClientSocket、 基 类 为 CAsyncSocket, 如 
图 3.16 所 示 。 


MFC 添加 类 向 导 - Client 
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图 3.16 JH MFC 添加 类 向 导 创建 客户 机 套 接 字 类 


单 击 “ 完 成 ”按钮 ,系统 会 自动 生成 CClientSocket 类 对 应 的 头 文件 ClientSocket. h 和 
ClientSocket. cpp 文件 ,读者 在 解决 方案 资源 管理 器 中 可 以 观察 到 这 个 变化 。 

(2) 使 用 MFC 类 向 导 完 善 CClientSocket 类 的 定义 。 在 解决 方案 资源 管理 器 中 右 击 项 
目 名 称 Client. 在 快捷 菜单 中 选择 “类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 将 类 名 称 选 择 为 
CClientSocket。 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 ,分 别 从 左下 角 的 “ 虚 函 数 ” 列 表 框 中 选择 
OnClose、OnConnect、OnReceive 3 个 虚 函 数 , 单 击 “ 添 加 函数 ”按钮 ,将 这 3 个 虚 函 数 添加 到 
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“已 重 写 的 虚 函 数 ” 列 表 框 中 。 这 样 , 套 接 字 类 CClientSocket 就 完成 了 对 上 述 3 个 虚 函 数 的 
重 载 ,定义 结果 如 图 3.17 所 示 。 
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图 3.17 用 MFC 类 向 导 为 自 定义 套 接 字 类 重 载 3 个 虚 函 数 
上 述 操作 会 自动 在 ClientSocket. h 和 ClientSocket. cpp 文件 中 添加 相应 的 代码 定义 ， 
对 于 详情 读者 可 参见 程序 3. 1 。 
(3) 为 套 接 字 类 CClientSocket 添加 一 般 的 成 员 函 数 和 成 员 变量 。 在 MFC 类 向 导 中 切 
换 到 ”成 员 变量 ?选项 卡 , 为 套 接 字 类 添加 一 个 私有 的 成 员 变量 , 它 是 指向 对 话 框 类 
CClientDlg 的 指针 。 其 代码 如 下 : 


private: 
CClientDlg * m pDlg; 


切换 到 “方法 ”选项 卡 ,再 添加 一 个 成 员 函 数 , 其 代码 如 下 : 

public: 

void setParentDlg(CClientDlg * pDlg); 

上 述 操作 同样 会 反映 到 ClientSocket. h 中 ,生成 变量 和 函数 的 声明 ; 反映 到 
ClientSocket. cpp 文件 中 ,生成 函数 的 框架 代码 。 如 果 用 户 特别 熟练 ,也 可 以 不 借助 向 导 编 
码 ,直接 在 文件 中 编辑 添加 。 

(4) 手工 添加 其 他 代码 。 对 于 ClientSocket. h ,在 文件 开头 添加 对 话 框 类 CClientDlg 
的 声明 ,其 代码 如 下 : 

class CClientDlg; 
对 于 ClientSocket. cpp 文件 ,有 以 下 4 处 添加 。 
CD 在 文件 头 ,添加 对 话 框 类 的 头 文件 : 


# include "ClientDlg. h" 
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© 在 构造 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 初始 化 代码 : 

m_pDlg = NULL; 

© 在 析 构 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 置 空 代码 : 

m pDlg = NULL; 

@ 为 成 员 函 数 On Connect, OnReceive, OnClose, setParentDlg š Jill My 4r 32 38 (C83 , FÉ 
情 参 见 程序 3. 1。 事 实 上 ,在 前 3 个 函数 中 不 做 具体 操作 ,所 有 操作 均 转 到 对 话 框 类 中 进行 
处 理 , 下 面 在 对 话 框 类 中 还 要 添加 3 个 函数 分 别处 理 OnConnect, OnReceive, OnClose 应 该 
完成 的 操作 。 

5. 为 对 话 框 类 CClientDlg 中 的 3 个 按钮 控件 添加 单 击 事件 处 理 函 数 

函数 名 称 的 定义 参见 表 3. 6。 

表 3.6 为 CClientDlg 类 中 的 按钮 控件 添加 事件 响应 函数 


控件 ID 消息 成 员 函 数 (响应 函数 ) 
IDC_BUTTON_CONNECT BN_CLICKED OnClickedButtonConnect 
IDC BUTTON DISCONNECT BN CLICKED OnClickedButtonDisconnect 
IDC BUTTON SEND BN CLICKED OnClickedButtonSend 


这 一 步 操作 可 以 用 MFC 类 向 导 自动 完成 ,如 图 3. 18 所 示 ,选择 类 名 为 CClientDlg , 然 
后 切换 到 “命令 ”选项 卡 , 在 左下 角 选 择 按钮 控件 对 应 的 ID, 在 中 间 的 消息 列表 框 中 选择 消 
Æ BN_CLICKED, 单 击 “ 添 加 处 理 程序 ”按钮 ,添加 成 员 函 数 到 下 面 的 列表 框 中 。 之 后 单 击 
“确定 ”按钮 ,全 部 操作 会 自动 反映 到 ClientDlg. h 和 ClientDlg. cpp 中 ,详情 参见 程序 3. 1 。 
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3.18 为 CClientDlg 类 添加 按钮 单 击 事件 处 理 函 数 
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6. 为 CClientDIg 类 添加 与 套 接 字 关联 的 成 员 变 量 和 成 员 函 数 


用 MFC 类 向 导 添加 成 员 变量 ,其 代码 如 下 : 
public: 
CClientSocket m sClientSocket; 


用 MFC 类 向 导 添 加 下 面 3 个 成 员 函 数 : 


void onConnect(void); // 对 应 处 理 套 接 字 的 OnConnect 事件 函数 
void onReceive(void); // 对 应 处 理 套 接 字 的 OnReceive 事件 函数 
void onClose(void); // 对 应 处 理 套 接 字 的 OnClose 事件 函数 


完成 后 , MFC 类 向 导 如 图 3. 19 所 示 。 上 述 操作 会 自动 反映 到 ClientDlg. h 和 
ClientDlg. cpp 中 ,详情 参见 程序 3. 1。 


国 |cclientple si LLLINMM 


ax: CDialogix SEAD: (clientdlg.h Ë) 
资源 : IDD CLIENT DIALOG ZERU: clientdlg. cpp Ë) 
命令 | 消息 BER RARE MÈ 
Exit | ET 
s. rn LL -— 
inem TH 
prre ein 总 到 定义 人 
*OnC1 i ckedBut tonDi sconnect 转 到 声明 (BE) 
EGIT 

wid 

En 


void 
UINT nID, LPARAE Param 


说 明 : 


DL» J[ wa J 


图 3.19 为 CClientDlg 类 添加 3 个 成 员 函 数 与 套 接 字 对 接 
7. 手工 添加 部 分 代码 


在 ClientDlg. h 文件 头 部 添加 对 于 ClientSocket. h 的 包含 命令 ,获得 对 套 接 字 的 访问 支 
持 , 其 代码 如 下 : 

# include "ClientSocket. h" 

在 ClientDlg. cpp 文件 中 添加 对 控件 成 员 变量 的 初始 化 代码 : 


BOOL CClientD1g: :OnInitDialog() 


{ 

// 系 统 自动 生成 的 代码 此 处 省 略 

//Top0: 在 此 添加 额外 的 初始 化 代码 

m strServerName = "localhost"; // 客 户 机 要 连接 的 服务 器 主机 名 
m nServerPort = 1024; // 服 务 器 端口 


UpdateData(FALSE) ; // 用 控件 成 员 变量 更 新 控件 界面 
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m sClientSocket. setParentDlg(this); 
GetDlgItem(IDC EDIT TOSERVER) 一 > EnableWindow(FALSE); 


// 设 置 套 接 字 绑 定 的 对 话 框 指针 变量 
// 禁 用 发 送 消息 文本 框 


GetDlgItem( IDC_BUTTON_DISCONNECT) —» EnableWindow(FALSE); // 禁 用 断 开 按钮 


GetDlgItem(IDC BUTTON SEND) 一 > EnableWindow(FALSE) ; 
return TRUE; 
} 


8. 添加 事件 函数 和 成 员 函 数 业务 逻辑 代码 


// 禁 用 发 送 按钮 


在 ClientDlg. cpp 中 完善 CClientDlg 的 事件 处 理 函 数 和 成 员 函 数 代 码 , 在 
ClientSocket. cpp 文件 中 完善 CClientSocket 的 事件 处 理 函 数 代码 ,详情 参见 程序 3. 1 。 


3.2.3 客户 机 代码 分 析 


为 了 缩减 篇 幅 、 突 出 重点 ,对 于 由 MFC 类 向 导 自 动 生成 的 框架 代码 大 多 省 略 ,对 于 用 


户 添加 的 代码 详细 列 出 。 程 序 完 成 后 的 解决 方案 资源 管理 
器 如 图 3. 20 所 示 ,该 图 中 给 出 了 构成 项 目的 文件 清单 和 程 
序 结构 。 

应 用 程序 Client. h 和 Client. cpp 对 应 CClientApp 类 的 
定义 和 实现 ,完全 由 VC++ 2010 的 MFC 类 向 导 自 动 创 建 , 它 
们 是 整个 项 目的 入 口 文件 ,编程 者 不 需 做 任何 改动 。 
Resource. h, stdafx. h, stdafx. cpp, targetver. h 等 由 系统 自 
动 生成 ,不 需要 改动 。 

下 面 重点 给 出 ClientSocket. h、ClientSocket. cpp、 
ClientDlg. h 和 ClientDlg. cpp 3X 4 个 文件 的 清单 。 

程序 3.1 点 对 点 通信 客户 机 完整 代码 

派生 的 套 接 字 类 CClientSocket 的 定义 和 实现 分 别 在 
ClientSocket. h、ClientSocket. cpp 文件 中 。 

(1) ClientSocket. h 头 文件 清单 : 


//CClientSocket 客户 机 套 接 字 类 的 定义 


# pragma once 
class CClientDlg; 
class CClientSocket : public CAsyncSocket 
{ 
public: 
CClientSocket(); 
virtual —CClientSocket(); 
virtual void OnConnect(int nErrorCode); 
virtual void OnReceive(int nErrorCode); 
virtual void OnClose(int nErrorCode); 
private: 
CClientDlg * m pDlg; 
public: 
void setParentDlg(CClientDlg * pDlg); 
}; 


解决 方案 资源 管理 器 9 x 
FIFE 
NUS “Client ”(1 个 项 
a 名 外 部 依赖 项 
s 加 XX 
BD Client.h 
W ClientDlg. h 
W ClientSocket.h 
i8) Resource. h 
i8) stdafz.h 
B targetver.h 
= mmt 
el Client. cpp 
lClientDlg. cpp 
€lClientSocket. cpp 
€i stdafx. cpp 
s mx 
il Client. ico 
D Client.rc 
B Client.rc2 
€) Reade. txt 


3.20 ”项目 完成 后 的 解决 
方案 资源 管理 器 


// 响 应 OnConnect 事件 
// 响 应 OnReceive 事件 
// 响 应 OnClose 事件 
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(2) ClientSocket. cpp 文件 清单 : 


//ClientSocket.cpp: 实现 文件 


# include "stdafx. h" 
# include "Client. h" 
# include "ClientSocket. h" 
# include "ClientDlg. h" 
//CClientSocket 
CClientSocket::CClientSocket() 
{ 
m_pD1g = NULL; 
) 
CClientSocket: : —CClientSocket() 
( 
m pDlg = NULL; 
) 
//CClientSocket 成 员 函 数 
void CClientSocket: :OnConnect( int nErrorCode) 
( 
// 调 用 CCLientDlg 类 的 onConnect ( ) 函 数 
CAsyncSocket : :OnConnect(nErrorCode) ; 
if (nErrorCode == 0) m pDlg- > onConnect() ; 
) 


void CClientSocket: :OnReceive( int nErrorCode) 
{ 
// 调 用 CC1ientD1g 类 的 onReceive( ) 函 数 
CAsyncSocket : :OnReceive(nErrorCode); 
if (nErrorCode == 0) m pDlg-  onReceived(); 
) 
void CClientSocket: :OnClose(int nErrorCode) 
{ 
// 调 用 CClientD1g 类 的 onClose() 函数 
CAsyncSocket : : OnClose( nErrorCode); 
if (nErrorCode == 0) m pDlg-  onClose(); 
) 
void CC1ientSocket: :setParentD1g(CC1ientD1g * pDlg) 
( 
m pDlg- pDlg; 
) 


WMFC 套 接 字 编程 


对 话 框 类 CClientDlg 的 定义 和 实现 分 别 在 ClientDlg. h 和 ClientDlg. cpp 中 。 


(3) ClientDlg. h 文件 清单 : 
//ClientDlg.h : 头 文件 


* pragma once 
# include "ClientSocket. h" 
//CClientDlg 对 话 框 
class CClientD1g : public CDialogEx 
{ 
public: 

CClientSocket m sClientSocket; 
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CClientDlg(CHnd * pParent = NULL); // 标 准 构造 函数 
// 对 话 框 数 据 

enum ( IDD = IDD CLIENT DIALOG ); 

protected: 

virtual void DoDataExchange(CDataExchange * pDX); //DDX/DDV 支持 
protected: 


HICON m hlIcon; 


// 生 成 的 消息 映射 函数 
virtual BOOL OnInitDialog(); 
afx msg void OnSysCommand(UINT nlID, LPARAM lParam); 
afx msg void OnPaint(); 
afx msg HCURSOR OnQueryDragIcon() ; 
DECLARE MESSAGE MAP() 
public: 
CString m strServerName; 
CString m strToServer; 
CListBox m listReceived; 
CListBox m listSent; 
int m nServerPort; 
afx msg void OnClickedButtonConnect( ) ; 
afx msg void OnClickedButtonDisconnect(); 
afx msg void OnClickedButtonSend(); 


void onConnect(void); 
void onReceived(void); 
void onClose(void); 


}; 
(4) ClientDlg. cpp 文件 清单 : 
//ClientDlg.cpp: 实现 文件 


# include "stdafx. h" 

# include "Client. h" 

# include "ClientDlg. h" 
* include "afxdialogex. h" 


// 用 于 应 用 程序 “关于 ”菜单 项 的 CAboutD1g 对 话 框 
class CAboutDlg : public CDialogEx 
{ 
public: 
ChboutDlg(); 


// 对 话 框 数据 
enum ( IDD = IDD ABOUTBOX } 


protected: 
virtual void DoDataExchange(CDataExchange * pDX); //DDX/DDV 支持 


protected: 
DECLARE MESSAGE MAP() 
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CAboutDlg::CAboutDlg() : CDialogEx(CAboutDlg: : IDD) 
t 
) 


void CAboutD1g: : DoDataExchange( CDataExchange * pDX) 
( 

CDialogEx::DoDataExchange(pDX) ; 

) 


BEGIN MESSAGE MAP(CAboutDlg, CDialogEx) 
END MESSAGE MAP() 


//CClientDlg 对 话 框 
CClientDlg::CClientDlg(CWnd * pParent / * = NULL* /) 
: CDialogEx(CClientDlg::IDD, pParent) 
{ 
m hlcon = AfxGetApp() 一 > LoadIcon(IDR MAINFRAME); 
m strServerName - T(""); 
m strToServer = T(""); 


m nServerPort 0; 


void CClientDlg::DoDataExchange(CDataExchange * pDX) 

{ 
CDialogEx: :DoDataExchange( pDX) ; 
DDX Text(pDX, IDC EDIT SERVERNAME, m strServerName); 
DDX Text(pDX, IDC EDIT TOSERVER, m strToServer); 
DDX Control(pDX, IDC LIST RECEIVED, m listReceived); 
DDX Control(pDX, IDC LIST SENT, m listSent); 
DDX Text(pDX, IDC EDIT SERVERPORT, m nServerPort); 
DDV MinMaxInt(pDX, m nServerPort, 1024, 49151); 


BEGIN MESSAGE MAP(CClientDlg, CDialogEx) 
ON WM SYSCOMMAND() 
ON WM PAINT() 
ON WM QUERYDRAGICON() 
ON BN CLICKED(IDC BUTTON CONNECT, &CClientDlg: :OnClickedButtonConnect) 
ON BN CLICKED(IDC BUTTON DISCONNECT, &CClientDlg: :OnClickedButtonDisconnect) 
ON BN CLICKED(IDC BUTTON SEND, &CClientDlg: :OnClickedButtonSend) 
END MESSAGE MAP() 


//CClientDlg 消息 处 理 程序 
BOOL CC1ientD1g: :OnInitDialog() 
{ 

CDialogEx: :OnInitDialog(); 


// 将 “关于 ”菜单 项 添加 到 系统 菜单 中 


//IDM_ABOUTBOX 必须 在 系统 命令 范围 内 
ASSERT((IDM ABOUTBOX & OxFFFO) == IDM ABOUTBOX); 
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} 


ASSERT(IDM ABOUTBOX < 0xF000) ; 


CMenu * pSysMenu = GetSystemMenu(FALSE); 
if (pSysMenu != NULL) 
t 
BOOL bNameValid; 
CString strAboutMenu; 
bNameValid = strAboutMenu. LoadString(IDS ABOUTBOX); 
ASSERT(bNameValid); 
if (! strAboutMenu. IsEnpty()) 
t 
pSysMenu - > AppendMenu(MF SEPARATOR); 
pSysMenu- > AppendMenu(MF STRING, IDM ABOUTBOX, strAboutMenu); 


) 
// 设 置 此 对 话 框 的 图 标 , 当 应 用 程序 主 窗口 不 是 对 话 框 时 ,框架 将 自动 执行 此 操作 


SetIcon(m hIcon, TRUE); // 设 置 大 图 标 
SetIcon(m hIcon, FALSE); // 设 置 小 图 标 


//TOD0: 在 此 添加 额外 的 初始 化 代码 

m strServerName = "localhost"; 

m nServerPort - 1024; 

UpdateData(FALSE) ; 

m sClientSocket. setParentDlg(this); 

GetDlgItem(IDC EDIT TOSERVER) — > Enableindow(FALSE) ; 

GetDlgItem(IDC BUTTON DISCONNECT) -> EnablelWindow(FALSE); 

GetDlgItem(IDC BUTTON SEND) — > EnableWindow( FALSE) ; 

return TRUE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE. 


void CClientDlg::OnSysCommand(UINT nlID, LPARAM lParam) 


( 


i 


if ((nID & OXFFFO) == IDM ABOUTBOX) 
t 
ChboutDlg dlgAbout; 
dighbout. DoModal ( ) ; 
} 
else 
{ 
CDialogEx: :OnSysCommand(nID, lParam); 
H 


// 如 果 向 对 话 框 添加 最 小 化 按钮 , 则 需要 下 面 的 代码 
// 来 绘制 该 图 标 。 对 于 使 用 文档 /视图 模型 的 MEC 应 用 程序 ， 
// 这 将 由 框架 自动 完成 


void CClientD1g: :OnPaint() 


( 


if (IsIconic()) 
t 
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CPaintDC dc(this); // 用 于 绘制 的 设备 上 下 文 
SendMessage(WM ICONERASEBKGND, reinterpret cast < WPARAM >(dc. GetSafeHdc()), 0); 


/ ARV be T. PE K EJE rh Ji rh 

int cxIcon - GetSystemMetrics(SM CXICON); 
int cyIcon - GetSystemMetrics(SM CYICON); 
CRect rect; 

GetClientRect(&rect); 

int x = (rect.Width() — cxIcon + 1)/2; 
int y = (rect.Height() — cylIcon + 1) / 2; 


// 绘 制图 标 
dc.DrawIcon(x, y, m hIcon); 
) 
else 
{ 
CDialogEx: :OnPaint(); 
J 
) 


// 当 用 户 拖 动 最 小 化 窗口 时 系统 调用 此 函数 取得 光标 显示 
HCURSOR CClientD1g: :OnQueryDragIcon( ) 
{ 
return static cast < HCURSOR»(m hIcon); 
) 


void CClientDlg: :OnClickedButtonConnect() 
{ 
//TOD0: 在 此 添加 控件 通知 处 理 程序 代码 
UpdateData(TRUE) ; 
GetDlgItem(IDC BUTTON CONNECT) — > EnableWindow(FALSE); 
GetDlgItem(IDC EDIT SERVERNAME) — > EnableWindow( FALSE) ; 
GetDlgItem(IDC EDIT SERVERPORT) 一 > EnableWindow(FALSE) ; 
m sClientSocket.Create(); 
m sClientSocket.Connect(m strServerName, m nServerPort); 
) 


void CClientDlg: :OnCl ickedButtonDisconnect() 
{ 
//ropo: 在 此 添加 控件 通知 处 理 程序 代码 
onClose(); 


) 


void CClientDlg::OnClickedButtonSend() 
( 
//'TODO: 在 此 添加 控件 通知 处 理 程序 代码 
int nMsgLen; 
int nSentLen; 
UpdateData(TRUE) ; 
if(!m strToServer. IsEnpty() ) 
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nMsgLen = m strToServer.GetLength() * sizeof(m strToServer); 
nSentLen- m sClientSocket.Send(m strToServer, nMsgLen) ; 
if (nSentLen!= SOCKET ERROR) ( // 发 送 成 功 
m listSent. AddString(m strToServer); 
ÜpdateData(FALSE) ; 
) eise( 
RfxMessageBox(LPCTSTR(" 客 户 机 向 服务 器 发 送信 息 出 现 错误 !"),MB_OK|MB_ICONSTOP) ; 
} 
m_strToServer. Empty() ; 
UpdateData(FALSE); 


// 客 户 机 已 经 连接 到 服务 器 上 

void CClientD1g: :onConnect(void) 

{ 
GetDlgItem(IDC EDIT TOSERVER) - > EnableWindow(TRUE); 
GetDlgItem(IDC BUTTON DISCONNECT) 一 > EnableWindow( TRUE); 
GetDlgItem(IDC BUTTON SEND) — > EnableWindow( TRUE); 


void CClientDlg: :onReceived(void) 
( 

TCHAR buff[4096]; 

int nBufferSize - 4096; 

int nReceivedLen; 

CString strReceived; 


nReceivedLen = m sClientSocket. Receive(buff, nBufferSize); 
if(nReceivedLen!- SOCKET ERROR) 
{ 
buff[nReceivedLen]- _T('\0'); 
CString szTemp(buff); 
strReceived = szTemp; 
m listReceived. AddString(strReceived); 
UpdateData(FALSE) ; 
}else ( 
AfxMessageBox(LPCTSTR(" 客 户 机 从 服务 器 接收 信息 出 现 错误 !"), MB_OK|MB_ICONSTOP); 


void CClientD1g: :onClose(void) 
m sClientSocket. Close(); 
GetDlgItem(IDC EDIT TOSERVER) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC BUTTON DISCONNECT) 一 > EnableWindow(FALSE) ; 
GetDlgItem(IDC BUTTON SEND) 一 > EnableWindow(FALSE); 
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// 清 除 两 个 列表 框 信息 
while (m listSent.GetCount()!- 0) m listSent.DeleteString(0); 
while (m listReceived.GetCount()!- 0) m listSent.DeleteString(0); 
GetDlgItem(IDC EDIT SERVERNAME) 一 > EnableWindow(TRUE); 
GetDlgItem(IDC EDIT SERVERPORT) 一 > EnableWindow(TRUE); 
GetDlgItem(IDC BUTTON CONNECT) 一 > EnableWindow(TRUE); 

) 


为 了 降低 调试 的 复杂 性 ,建议 读者 每 完成 一 个 步骤 即 进行 编译 测试 ,最 后 进行 综合 测 
试 ,运行 界面 如 图 3. 21 所 示 。 在 完成 后 面 的 服务 器 编程 后 再 联合 测试 。 


上 网 络 聊天 客户 机 


服务 器 主机 名: locahost BSBA : | 1024 
对 服务 器 说 : 


客户 机 已 经 说 过 的 话 : 


图 3.21 客户 机 运行 初始 界面 


3.2.4 创建 服务 器 
服务 器 项 目的 创建 步 又 与 客户 机 类 似 , 下 面 进行 简要 介绍 。 
1. 使 用 MFC 应 用 程序 向 导 创建 服务 器 程序 框架 


CD 启动 VS2010 ,选择 "文件 -新建 一 项 目 ” 命 令 ,弹出 “新 建 项 目 " 对 话 框 , 设 定 模板 为 
MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名 称 、 解 决 方案 名 称 为 Server, 并 指定 项 目 保 存 位 
置 ,然后 单 击 “确定 ”按钮 ,进入 MFC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 的 第 一 步 ,将 应 用 程序 类 型 设 定 为 “基于 对 话 框 ”。 

(3) 在 MFC 应 用 程序 向 导 的 第 二 步 ,设置 用 户 界面 初始 选项 。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 ,设置 高 级 功能 ,在 此 选择 Windows 套 接 字 ” 复 
(5) 在 MFC 应 用 程序 向 导 的 最 后 一 步 , 完 成 CServerApp 和 CServerDlg 类 的 自动 创 
建 ,生成 的 解决 方案 如 图 3.22 所 示 。 其 中 ,ServerSocket. h 和 ServerSocket. cpp 是 后 面 利 
用 MFC 类 向 导 添 加 的 。 


2. 为 服务 器 对 话 框 添加 控件 .构建 程序 主 界面 
在 资源 视图 中 展开 Dialog 资源 条 目 , 双 击 IDD_SERVER_DIALOG ,在 工作 区 中 会 出 
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现 一 个 对 话 框 ,借助 工具 箱 中 的 控件 ,将 程序 主 界面 设计 成 如 图 3. 23 所 示 的 布局 。 


解决 方案 资源 管理 器 “~? x 
PUTA 
Ei “Server "(1 AI] 


= ELT 
s E 头 文件 


lÀ Resource. h 

IÀ Server. h 

国 ServerDlg.h 

M ServerSocket.h 


| 
W stdafz,h esamas: EH | 
IÀ targetver.h 
= > 源 文 
€] Server. cpp | 
CÀ ServerDlg. cpp | 
3 ServerSocket. cpp 
stdafx, cpp | 
= > 资源 文件 
il Server. ico | 
Ë Server. rc | 
ËB Server. rc2 | 
E) Readlte. txt ee E A 


图 3.22 服务 器 项 目 解决 方案 图 3.23 服务 器 程序 主 对 话 框 界面 


图 3. 23 中 各 控件 的 定义 如 表 3.7 所 示 。 
表 3.7 服务 器 程序 主 对 话 框 中 各 控件 的 属性 
控件 ID 控件 标题 控件 类 型 
IDC_EDIT_SERVERNAME 编辑 框 Edit Control 


无 
IDC_EDIT_SERVERPORT 无 编辑 框 Edit Control 
IDC EDIT TOCLIENT x 编辑 框 Edit Control 
无 
无 


IDC_LIST_SENT 列表 框 List Box 

IDC_LIST_RECEIVED 列表 框 List Box 

IDC_BUTTON_LISTEN 开始 监听 按钮 Button Control 
IDC_BUTTON_CLOSELISTEN 断 开 监听 按钮 Button Control 
IDC_BUTTON_SEND 向 客户 机 发 送 消息 按钮 Button Control 
IDC STATICI 服务 器 主机 名 : 静态 文本 Static Text 
IDC_STATIC2 服务 器 端口 : 静态 文本 Static Text 
IDC_STATIC3 对 客户 机 说 : 静态 文本 Static Text 
IDC_STATIC4 已 发 送 的 消息 : 静态 文本 Static Text 
IDC_STATIC5 来 自 客户 端的 消息 : 静态 文本 Static Text 


3. 为 对 话 框 中 的 控件 对 象 定义 相应 的 成 员 变 量 


在 解决 方案 资源 管理 器 中 的 项 目 名 称 Server. 上 右 击 , 在 快捷 菜单 中 选择 “类 向 导 ” 命 
令 , 进 入 MFC 类 向 导 。 

切换 到 “成 员 变量 ”选项 卡 ,用 “添加 变量 ”按钮 为 表 3. 8 中 的 编辑 类 控件 定义 成 员 变量 。 
图 3. 24 展示 的 是 成 员 变量 定义 完成 后 的 界面 。 

控件 成 员 变 量 的 定义 结果 如 表 3. 8 所 示 。 上 述 操作 会 自动 在 ServerDlg. h 和 
ServerDlg. cpp 中 完成 变量 的 定义 和 初始 化 ,详情 参见 程序 3.2. 
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图 3. 24 用 MFC 类 向 导 为 控件 定义 成 员 变 量 
表 3.8 为 CServerDlg 类 添加 对 应 控件 的 成 员 变量 


控件 ID 对 应 成 员 变量 名 称 变量 类 型 取 值 范围 
IDC EDIT SERVERNAME m strServerName CString 
IDC EDIT SERVERPORT m nServerPort int 1024—49 151 
IDC EDIT TOSERVER m strToServer CString 
IDC LIST SENT m listSent CListBox 
IDC LIST RECEIVED m listReceived CListBox 


4. 创建 从 CAsyncSocket 类 派生 的 子 类 CServerSocket . 处 理 与 客户 机 的 通信 


(1) 服务 器 应 创建 自己 的 套 接 字 类 ,负责 与 客户 机 的 通信 。 这 个 套 接 字 类 应 当 从 
CAsyncSocket 类 派生 ,并 且 能 够 将 套 接 字 事件 传递 给 对 话 框 类 CServerDlg, 在 对话 框 类 中 
编程 者 可 以 自行 定义 套 接 字 事件 处 理 函 数 。 

在 如 图 3. 22 所 示 的 解决 方案 资源 管理 器 中 右 击 项 目 名 称 Server, 在 快捷 菜单 中 选择 
“添加 一 类 ”命令 ,进入 MFC 添加 类 向 导 , 设 定 类 名 为 CServerSocket、 基 类 为 CAsyncSocket, 如 
图 3. 25 所 示 。 

单 击 “ 完 成 ”按钮 ,系统 会 自动 生成 CServerSocket 类 对 应 的 头 文件 ServerSocket. h 和 
ServerSocket. cpp 文件 。 在 图 3. 22 所 示 的 解决 方案 资源 管理 器 中 读者 可 以 观察 到 这 个 
变化 。 

(2) 使 用 MFC 类 向 导 完 善 CServerSocket 类 的 定义 。 在 解决 方案 资源 管理 器 中 右 击 
项 目 名 称 Server, 在 快捷 菜单 中 选择 “类 向 导 ” 命 令 , 进 入 MFC 类 向 导 对 话 框 ,将 类 名 称 选 
择 为 CServerSocket。 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 .分 别 从 左下 角 的 “ 虚 函 数 ” 列 表 框 中 选择 
OnClose、OnAccept、OnReceive 3 个 虚 函 数 , 单 击 “ 添 加 函数 ”按钮 ,将 这 3 个 虚 函 数 添加 到 
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图 3.25 用 MFC 添加 类 向 导 创 建 服务 器 套 接 字 类 
“已 重 写 的 虚 函 数 ” 列 表 框 中 。 这 样 ,就 为 自己 的 套 接 字 类 CServerSocket 完成 了 对 上 述 3 


个 虚 函 数 的 重 载 ,定义 结果 如 图 3. 26 所 示 。 


MFC 类 向 导 

Jp MFC Class Wizard 
? 

TO: 

LU ChsyncSocket 

资源 : 

命令 | 消息 EER papal 方法 


- 
— s= i 


faerversocket. cpp C) 


P) mama 


BERD: 己 重 写 的 虚 函 数 (0) : 


AssertValid 


OnSend 
Serialize 


说 明 : 当 数 据 可 以 接轨 时 调用 


(HEERO 


图 3.26 JH MFC 类 向 导 为 自 定义 套 接 字 类 重 载 3 个 虚 函 数 


上 述 操 作 会 自动 在 ServerSocket. h 和 
ServerSocket. cpp 文件 中 添加 相应 的 代码 定义 , 详 
情 可 参见 程序 3.2, 

(3) 为 套 接 字 类 CServerSocket 添加 一 般 的 
成 员 函 数 和 成 员 变 量 。 在 MFC 类 向 导 中 切换 到 
“成 员 变 量 ” 选 项 卡 ,为 套 接 字 类 添加 一 个 私有 的 
成 员 变 量 ( 如 图 3. 27), 它 是 指向 对 话 框 类 


添加 成 员 变量 
变量 类 到 (TD): 
Cserverblg _ 
EELIOH 
noble 
访问 


口 公共 中 口 受 保护 人 OLAV 


az | ma )] 


图 3. 27 为 服务 器 套 接 字 类 添加 成 员 变量 
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CServerDlg 的 指针 。 
其 代码 如 下 : 


private: 
CServerDlg * m pDlg; 


切换 到 * 方 法 ”选项 卡 ,再 添加 一 个 成 员 函 数 ,其 代码 如 下 : 


public: 
void setParentDlg(CServerDlg * pDlg); 


上 述 操作 同样 会 反映 到 ServerSocket. h 中 ,生成 变量 和 函数 的 声明 ; 反映 到 
ServerSocket. cpp 文件 中 ,生成 函数 的 框架 代码 。 

(4) 手工 添加 其 他 代码 。 对 于 ServerSocket. h, 在 文件 开头 添加 对 话 框 类 CServerDlg 
的 声明 ,其 代码 如 下 : 

class CServerDlg; 

对 于 ServerSocket. cpp 文件 ,有 以 下 4 处 添加 。 

CD 在 文件 头 , 添 加 对 话 框 类 的 头 文件 : 

# include "ServerDlg. h" 

© 在 构造 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 初始 化 代码 : 

m_pDlg = NULL; 

C 在 析 构 函数 中 ,添加 对 话 框 指针 成 员 变量 的 置 空 代码 : 

m_pD1g = NULL; 

CD Jg A ER C OnAccept、OnReceive、OnClose、setParentDlg 添加 业务 逻辑 代码 ,详情 
参见 程序 3.2。 与 客户 机 一 样 ,在 前 3 个 函数 中 不 做 具体 操作 ,所 有 操作 均 转 到 对 话 框 类 中 
进行 处 理 。 在 对 话 框 类 中 要 添加 3 个 函数 分 别处 理 OnAccept、OnReceive、OnClose 这 3 个 
函数 应 该 完成 的 操作 。 

5. 为 对 话 框 类 CServerDlg 中 的 3 个 按钮 控件 添加 单 击 事件 处 理 函 数 

函数 名 称 的 定义 参见 表 3. 9 。 

表 3.9 为 CServerDlg 类 中 的 按钮 控件 添加 事件 响应 函数 


控件 ID ñ = 成 员 函 数 (响应 函数 ) 
IDC_BUTTON_LISTEN BN_CLICKED OnClickedButtonListen 
IDC BUTTON CLOSELISTEN BN CLICKED OnClickedButtonCloselisten 
IDC BUTTON SEND BN CLICKED OnClickedButtonSend 


这 一 步 操作 可 以 用 MFC 类 向 导 自 动 完 成 。 如 图 3. 28 Bros ,选择 类 名 为 CServerDlg， 
切换 到 “命令 ”选项 卡 ,在 左下 角 选 择 按钮 控件 对 应 的 ID, 在 中 间 消 息 列 表 框 中 选择 消息 
BN_CLICKED, 单 击 “ 添 加 处 理 程序 ”按钮 ,添加 成 员 函 数 到 下 面 的 列表 框 中 。 然 后 单 击 “ 确 
定 ” 按 钮 , 则 所 有 操作 会 自动 反映 到 ServerDlg. h 和 ServerDlg. cpp P. 
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图 3.28 为 CServerDlg 类 添加 按钮 单 击 事件 处 理 函 数 


6. 为 CServerDlg 类 添加 与 套 接 字 关联 的 成 员 变 量 和 成 员 函 数 
用 MFC 类 向 导 添 加 成 员 变量 ,其 代码 如 下 : 


CServerSocket m sServerSocket; // 服 务 器 侦 听 套 接 字 

CServerSocket m sClientSocket; // 服 务 器 用 来 与 客户 机 连接 的 套 接 字 

注意 : 为 了 完成 与 客户 机 的 通信 ,在 服务 器 端 需要 定义 两 个 套 接 字 对 象 ,其 在 表 3.2 中 
有 描述 。 

用 MFC 类 向 导 添 加 下 面 3 个 成 员 函 数 : 

void onClose(void); // 对 应 处 理 套 接 字 的 OnClose 事件 函数 

void onAccept( void) ; // 对 应 处 理 套 接 字 的 OnAccept 事件 函数 

void onReceive(void); // 对 应 处 理 套 接 字 的 OnReceive 事件 函数 


借助 向 导 完 成 的 操作 会 自动 反映 到 ServerDlg. h 和 ServerDlg. cpp 中 。 
7. 手工 添加 部 分 代码 


在 ServerDlg. h 文件 头 部 添加 对 于 ServerSocket. h 的 包含 命令 ,以 获得 对 套 接 字 的 访 
问 支持 ,其 代码 如 下 : 


# include "ServerSocket. h" 


在 ServerDlg. cpp 文件 中 添加 对 控件 成 员 变量 的 初始 化 代码 : 
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BOOL CServerDlg: :OnInitDialog() 
{ 
// 系 统 自动 生成 的 代码 此 处 省 略 


//ropo: 在 此 添加 额外 的 初始 化 代码 

m strServerName = "localhost"; 

m nServerPort - 1024; 

UpdateData(FALSE) ; 

m sServerSocket. setParentDlg(this); 

m sClientSocket. setParentDlg(this); 

return TRUE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE. 
) 


8. 添加 事件 函数 和 成 员 函 数 业务 逻辑 代码 


在 ServerDlg. cpp 中 完善 CServerDlg 的 事件 处 理 函 数 和 成 员 函 数 代码 , 在 
ServerSocket. cpp 文件 中 完善 CServerSocket 的 事件 处 理 函 数 代 码 ,详情 参见 程序 3. 2。 


3.2.5 服务 器 代码 分 析 


同 客 户 机 一 样 ,应 用 程序 Server. h 和 Server. cpp 对 应 CServerApp 类 的 定义 和 实现 ， 
完全 由 VC++ 2010 的 MFC 类 向 导 自动 创建 ,它们 是 整个 项 目的 入 口 文 件 ,编程 者 不 需 做 
任何 改动 。Resource. h.stdafx. h, stdafx. cpp, targetver. h 等 由 系统 自动 生成 ,不 需要 
改动 。 

下 面 重点 给 出 ServerSocket. h、ServerSocket. cpp、ServerDlg. h 和 ServerDlg. cpp 这 4 
个 文件 的 编码 清单 。 

程序 3.2 点 对 点 通信 服务 器 完整 代码 

派生 的 套 接 字 类 CServerSocket 的 定义 和 实现 分 别 在 ServerSocket. h、ServerSocket. 


cpp 文件 中 。 
(D ServerSocket.h 头 文件 清单 : 


* pragma once 


//CServerSocket 命令 目标 
class CServerDlg; 
class CServerSocket : public CAsyncSocket 
{ 
public: 
CServerSocket() ; 
virtual —CServerSocket(); 
virtual void OnAccept(int nErrorCode); 
virtual void OnClose(int nErrorCode); 
virtual void OnReceive(int nErrorCode); 
private: 
CServerDlg * m pDlg; 
public: 
void setParentDlg(CServerDlg * pDlg); 
}; 
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(2) ServerSocket. cpp 文件 清单 : 


//ServerSocket.cpp: 实现 文件 


# include "stdafx. h" 

# include "Server. h" 

# include "ServerSocket. h" 
# include "ServerDlg. h" 


CServerSocket: : CServerSocket() 
( 

m pDlg- NULL; 
) 


CServerSocket: : —CServerSocket( ) 
{ 
m pDlg- NULL; 
) 
//CServerSocket 成 员 函 数 


void CServerSocket: :OnAccept( int nErrorCode) 


{ 
//'T0DO: 在 此 添加 专用 代码 或 调用 基 类 
CAsyncSocket: :OnAccept ( nErrorCode) ; 


if(nErrorCode == 0) m pDlg -> onAccept(); 


) 


void CServerSocket: :OnClose(int nErrorCode) 


{ 
//TOD0: 在 此 添加 专用 代码 或 调用 基 类 
CAsyncSocket: :OnClose(nErrorCode); 


if(nErrorCode == 0) m pDlg -> onClose(); 


) 


void CServerSocket: :OnReceive( int nErrorCode) 


( 
//'T0DO: 在 此 添加 专用 代码 或 调用 基 类 


CAsyncSocket: :OnReceive(nErrorCode); 


if(nErrorCode == 0) m pDlg -> onReceive(); 


} 


void CServerSocket::setParentDlg(CServerDlg * pDlg) 


( 
m pDlg- pDlg; 
) 


(3) ServerDlg. h 文件 清单 : 
//ServerDlg.h : 头 文件 


# pragma once 
# include "ServerSocket. h" 


//CServerDlg 对 话 框 

class CServerDlg : public CDialogEx 
t 

publi: 

CServerDlg(CHnd* pParent = NULL); 
// 对 话 框 数 据 


// 标 准 构造 函数 
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enum { IDD = IDD SERVER DIALOG ); 


protected: 
virtual void DoDataExchange(CDataExchange * pDX); //DDX/DDV 支持 


protected: 
HICON m_hIcon; 
// 生 成 的 消息 映射 函数 
virtual BOOL OnInitDialog(); 
afx msg void OnSysCommand(UINT nID, LPARAM lParam); 
afx msg void OnPaint(); 
afx msg HCURSOR OnQueryDragIcon() ; 
DECLARE MESSAGE MAP() 
// 添 加 的 成 员 变量 和 成 员 函 数 声 明 
public: 
CString m_strServerName; 
int m nServerPort; 
CString m strToClient; 
CListBox m listReceived; 
CListBox m listSent; 
afx msg void OnClickedButtonCloselisten(); 
afx msg void OnClickedButtonListen(); 
afx msg void OnClickedButtonSend(); 
CServerSocket m sServerSocket; // 服 务 器 侦 听 套 接 字 
CServerSocket m sClientSocket; // 服 务 器 用 来 与 客户 机 连接 的 套 接 字 


void onClose(void); // 对 应 处 理 套 接 字 的 OnClose 事件 函数 
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void onAccept(void); // 对 应 处 理 套 接 字 的 OnAccept 事件 函数 
void onReceive(void); // 对 应 处 理 套 接 字 的 OnReceive 事件 函数 


}; 
(4) ServerDlg. cpp 文件 清单 : 
//ServerDlg.cpp: 实现 文件 


# include "stdafx. h" 

# include "Server. h" 

# include "ServerDlg. h" 
* include "afxdialogex. h" 


// 用 于 应 用 程序 “关于 ”菜单 项 的 CAboutDlg 对 话 框 
class CAboutDlg : public CDialogEx 
{ 


public: 
CAboutDlg(); 
// 对 话 框 数据 
enum { IDD = IDD ABOUTBOX }; 
protected: 


virtual void DoDataExchange( CDataExchange * pDX); //DDX/DDV 支持 
protected: 
DECLARE MESSAGE MAP() 
1; 


CAboutDlg::CAboutDlg() : CDialogEx(CAboutDlg: : IDD) 
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void CAboutDlg::DoDataExchange(CDataExchange * pDX) 
t 

CDialogEx: :DoDataExchange(pDX) ; 
) 


BEGIN MESSAGE MAP(CAboutDlg, CDialogEx) 
END MESSAGE MAP() 


//CServerDlg 对 话 框 


CServerDlg::CServerDlg(CWnd * pParent /* = NULL * /) 
: CDialogEx(CServerDlg::IDD, pParent) 
( 
m hIcon = AfxGetApp() 一 > LoadIcon(IDR MAINFRAME); 
m strServerName = T(""); 
m nServerPort 0; 
m strToClient = T(""); 


void CServerDlg::DoDataExchange(CDataExchange * pDX) 
( 
CDialogEx: :DoDataExchange(pDX) ; 
DDX Text(pDX, IDC EDIT SERVERNAME, m strServerName); 
DDX Text(pDX, IDC EDIT SERVERPORT, m nServerPort); 
DDV MinMaxInt(pDX, m nServerPort, 1024, 49151); 
DDX Text(pDX, IDC EDIT TOCLIENT, m strToClient); 
DDX Control(pDX, IDC LIST RECEIVED, m listReceived); 
DDX Control(pDX, IDC LIST SENT, m listSent); 


BEGIN MESSAGE MAP(CServerDlg, CDialogEx) 
ON WM SYSCOMMAND() 
ON WM PAINT() 
ON WM QUERYDRAGICON() 
ON BN CLICKED(IDC BUTTON CLOSELISTEN, &CServerDlg::OnClickedButtonCloselisten) 
ON BN CLICKED(IDC BUTTON LISTEN, &CServerDlg: :OnClickedButtonListen) 
ON BN CLICKED(IDC BUTTON SEND, &CServerDlg::OnClickedButtonSend) 
END MESSAGE MAP() 


//CServerDlg 消息 处 理 程 序 
BOOL CServerDlg: :OnInitDialog() 
{ 

CDialogEx: :OnInitDialog(); 


// 将 “关于 ”菜单 项 添加 到 系统 菜单 中 
//IDM_ABOUTBOX 必须 在 系统 命令 范围 内 

ASSERT((IDM ABOUTBOX & OxFFFO) == IDM ABOUTBOX); 
ASSERT(IDM ABOUTBOX < 0xF000) ; 


CMenu* pSysMenu = GetSystemMenu(FALSE); 
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if (pSysMenu != NULL) 
{ 
BOOL bNameValid; 
CString strAboutMenu; 
bNameValid = strAboutMenu. LoadString(IDS ABOUTBOX); 
ASSERT(bNameValid); 
if (!strAboutMenu. IsEmpty() ) 
t 
pSysMenu - > AppendMenu(MF SEPARATOR); 
pSysMenu 一 > AppendMenu(MF STRING, IDM ABOUTBOX, strAboutMenu); 


) 
// 设 置 此 对 话 框 的 图 标 . 当 应 用 程序 主 窗口 不 是 对 话 框 时 ,框架 将 自动 


// 执 行 此 操作 
SetIcon(m_hIcon, TRUE); // 设 置 大 图 标 
SetIcon(m_hIcon, FALSE); // 设 置 小 图 标 


//TODO: 在 此 添加 额外 的 初始 化 代码 

m_strServerName = "localhost"; 

m_nServerPort = 1024; 

UpdateData( FALSE) ; 

m_sServerSocket. setParentDlg( this); 

m_sClientSocket. setParentDlg( this); 

return TRUE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE 
) 


void CServerDlg::OnSysCommand(UINT nID, LPARAM lParam) 
{ 
if ((nID & OXFFFO) == IDM ABOUTBOX) 
t 
CAboutDlg dlgAbout; 
dlghbout. DoModal() ; 
) 
else 
{ 
CDialogEx::OnSysCommand(nID, lParam); 
} 
} 


// 如 果 向 对 话 框 添加 最 小 化 按钮 , 则 需要 下 面 的 代码 
// 来 绘制 该 图 标 。 对 于 使 用 文档 /视图 模型 的 MFC 应 用 程序 ， 
// 这 将 由 框架 自动 完成 
void CServerD1g: :OnPaint() 
{ 

if (IsIconic()) 

{ 

CPaintDC dc(this); // 用 于 绘制 的 设备 上 下 文 


SendMessage(WM ICONERASEBKGND, reinterpret_cast <WPARAM>(dc. GetSafeHdc()), 0); 
// 使 图 标 在 工作 区 矩形 中 居中 


int cxIcon = GetSystemMetrics(SM CXICON); 
int cyIcon = GetSystemMetrics(SM CYICON); 
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CRect rect; 

GetClientRect(&rect); 

int x = (rect.Width() — cxIcon + 1)/2; 
int y = (rect.Height() — cylIcon + 1) / 2; 
// 绘 制图 标 


dc.DrawIcon(x, y, m hlIcon); 
} 
else 
{ 
CDialogEx: :OnPaint(); 
} 
) 


// 当 用 户 拖 动 最 小 化 窗口 时 系统 调用 此 函数 取得 光标 
HCURSOR CServerD1g: :OnQueryDragIcon() 
{ 
return static_cast < HCURSOR»(m hlIcon); 
) 


void CServerDlg: :OnClickedButtonCloselisten() 
( 
//TODO: 在 此 添加 控件 通知 处 理 程序 代码 
onClose(); 


) 


void CServerDlg: :OnClickedButtonListen() 

( 
//TObO: 在 此 添加 控件 通知 处 理 程序 代码 
UpdateData(TRUE) ; 
GetDlgItem(IDC BUTTON LISTEN) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC EDIT SERVERNAME) 一 > EnableWindow( FALSE) ; 
GetDlgItem(IDC EDIT SERVERPORT) 一 > EnableWindow(FALSE); 
m sServerSocket. Create(m nServerPort); 
m sServerSocket. Listen(); 


GetDlgItem(IDC EDIT TOCLIENT) - > EnableWindow(TRUE); 
GetDlgItem(IDC BUTTON CLOSELISTEN) 一 > Enableilindow( TRUE) ; 
GetDlgItem(IDC BUTTON SEND) — > EnableWindow(TRUE) ; 


) 


void CServerDlg: :OnCl ickedButtonSend() 
( 

//'T0DO: 在 此 添加 控件 通知 处 理 程序 代码 

int nMsgLen; 

int nSentLen; 

UpdateData(TRUE) ; 

if(!m strToClient. IsEmpty()) 

{ 


nMsgLen- m strToClient.GetLength() * sizeof(m strToClient); 


nSentLen = m sClientSocket.Send(m strToClient, nMsgLen); 
if (nSentLen!- SOCKET ERROR) ( // 发 送 成 功 
m listSent.AddString(m strToClient); 
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UpdateData(FALSE) ; 
) else { 
RfxMessageBox(IPCTSTR(" 服 务 器 向 客户 机 发 送信 息 出 现 错误 !"),MB_OK|MB_ICONSTOP) ; 
} 
m strToClient. Empty( ) ; 
UpdateData(FALSE) ; 
) 
) 
// 从 套 接 字 的 OnClose 事件 函数 转 到 此 处 执行 
void CServerDlg: :onClose(void) 
( 
m listReceived. hddString(CString(" 服 务 器 收 到 了 OnClose 消息 ")); 
m sClientSocket. Close(); 
m sServerSocket. Close(); 
GetDlgItem(IDC EDIT TOCLIENT) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC BUTTON CLOSELISTEN) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC BUTTON SEND) — EnableWindow(FALSE); 
GetDlgItem(IDC EDIT SERVERNAME) 一 > EnableWindow( TRUE); 
GetDlgItem(IDC EDIT SERVERPORT) — EnableWindow(TRUE); 
GetDlgItem(IDC BUTTON LISTEN) 一 > EnableWindow(TRUE); 
) 
// 从 套 接 字 的 0nAccept 事件 函数 转 到 此 处 执行 
void CServerDlg: :onAccept (void) 
{ 
m listReceived. RddString(CString(" 服 务 器 收 到 了 OnAccept 消息 ")); 
m sServerSocket. Accept(m sClientSocket); 
GetDlgItem(IDC EDIT TOCLIENT) -> EnableWindow( TRUE); 
GetDlgItem(IDC BUTTON SEND) — > EnableWindow( TRUE) ; 
GetDlgItem(IDC BUTTON CLOSELISTEN) — > EnableWindow(TRUE) ; 
) 
// 从 套 接 字 的 OnReceive 事件 函数 转 到 此 处 执行 
void CServerDlg: :onReceive(void) 
{ 
TCHAR buff[ 4096]; 
int nBufferSize = 4096; 
int nReceivedLen; 
CString strReceived; 
m listReceived. AddString(CString(" 服 务 器 收 到 了 OnReceive 消息 ")); 
nReceivedLen = m sClientSocket. Receive(buff, nBufferSize); 
if(nReceivedLen!= SOCKET ERROR) 
{ 
buff[nReceivedLen] = _T('\0'); 
CString szTemp(buff) ; 
strReceived = szTemp; 
m listReceived. AddString(strReceived); 
UpdateData(FALSE) ; 
}else { 
RfxMessageBox(LPCTSTR(" 服 务 器 从 客户 机 接收 信息 出 现 错误 !" ), MB_OK|MB_ICONSTOP) ; 
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服务 器 程序 3. 2 的 运行 结果 如 图 3. 29 所 示 。 


5 网 络 聊天 服务 器 


服务 器 主机 各 :|bcahost 


EP: 


已 发 送 的 消息 : 


图 3.29 服务 器 运行 初始 界面 


3.2.6 点 对 点 通信 客户 机 与 服务 器 联合 测试 
读者 可 以 在 同一 台 计 算 机 上 测试 客户 机 与 服务 器 的 通信 过 程 ,图 3. 30 是 某 一 次 对 话 的 
联合 测试 结果 ,其 测试 步骤 如 下 : 
CD 启动 客户 机 和 服务 器 程序 ,其 初始 运行 界面 分 别 如 图 3. 21 和 图 3. 29 所 示 。 
C2) 单 击 服务 器 的 “开始 监听 ”按钮 ,然后 切换 到 客户 机 程序 , 单 击 “连接 服务 器 "按钮 。 
网 络 聊天 客户 机 


服务 器 主机 各 :| 


Lr cH 
ELE TE 


向 职务 器 发 送 消息 


客户 机 已 经 说 过 的 话 : 采 目 服务 器 的 消息 : 


Are you busy? Let's have a drink. Nice to meet youl 


Have a better day! 
TRESPIRCE 用 中 文 交流 吧 
悄 也 不 争 春 ， 只 把 春来 报 | 扳 加 一 夜 春风 来 

竺 到 山花 烂漫 时 ， 她 在 从 中 笑 


E 网 络 聊天 服务 器 


服务 器 主机 各 : | magn: | 


对 客户 机 说 : BEP 
已 发 送 的 消息 : 来 自 客 户 峙 的 消息 : 

[Nice to maet youl | “| 最 务 器 收 到 了 OnAccept 消 息 
Have a better day BRIT OnRecevei B 

用 中 文 交流 吧 Are you busy? Let's have a drink. 
赵 如 一 橙 春 反 来 服务 器 收 到 了 OnRecCewe 消 息 
RIUTHA , MEAP 


服务 器 收 到 了 OnReceve 消 息 
PDRE 


服务 器 疏 到 了 OnReceive 消 息 
RETIE RISE 


3.30 客户 机 与 服务 器 交互 界面 截图 
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客户 机 成 功 连接 服务 器 后 ,在 服务 器 端的 列表 框 中 会 显示 “服务 器 收 到 了 OnAccept 消息 ”， 
这 表示 服务 器 接受 了 客户 机 连接 。 

(3) 从 服务 器 给 客户 机 发 送 几 条 短 消息 ,再 从 客户 机 给 服务 器 发 送 几 条 短 消 息 ,或 者 交 
互 问答 。 客 户 机 会 将 发 出 的 消息 和 来 自 服务 器 的 消息 列表 显示 ,服务 器 也 是 如 此 。 而 且 每 
当 有 新 数据 到 达 服 务 器 ,服务 器 还 会 显示 “服务 器 收 到 了 OnReceive 消息 ”, 这 意味 着 服务 器 
连接 套 接 字 的 OnReceive 通知 函数 被 执行 。 

(4) 单 击 客户 机 的 “ 断 开 连接 ”按钮 ,测试 双方 反应 ; 单 击 服务 器 的 “ 断 开 监听 ?按钮 , 测 
试 双方 反应 。 

在 网 络 上 的 不 同 主机 之 间 进 行 测试 ,需要 修改 服务 器 主机 名 或 地 址 。 这 个 实例 美 中 不 
足 的 是 只 能 实现 客户 机 和 服务 器 的 一 对 一 通信 ,服务 器 不 能 同时 处 理 多 个 客户 端 连接 。 

将 程序 3. 1 和 程序 2.9 比较 ,将 程序 3. 2 和 程序 2. 10 比较 , 写 出 对 比分 析 结 果 , 大 家 一 
定 会 有 许多 新 的 发 现 。 对 于 如 何 让 服务 器 处 理 多 客户 机 连接 的 问题 ,相信 3.3 节 的 
CSocket 类 编程 实例 可 以 给 读者 带 来 新 的 启发 。 


6.3 CSocket 类 编程 实例 


本 节 给 出 一 个 使 用 CSocket 类 的 编程 实例 ,该 实例 演示 了 CArchive 对 象 十 CSocketFile 
对 象 十 CSocket 对 象 协 同 收 /发 数据 的 工作 机 制 。 


3.3.1 聊天 室 功能 和 技术 要 点 


聊天 室 的 基本 功能 如 下 : 

(1) 要 求 服 务 器 能 与 多 个 客户 机 建立 连接 ,同时 为 多 个 客户 机 服务 。 

(2) 服务 器 相当 于 聊天 室 的 大 厅 , 它 发 布 所 有 客户 机 的 发 言 ,并 将 客户 机 发 言 转发 给 其 
他 客户 机 ,从 而 间接 实现 客户 机 之 间 的 通信 。 

(3) 服务 器 动态 统计 进入 聊天 室 的 客户 机 数目 , 当 有 新 客户 机 加 入 或 退出 时 ,实时 更 新 
在 线 客户 数量 。 

项 目 完成 后 ,可 以 在 局 域 网 上 多 人 模拟 联合 测试 ,相互 对 话 , 体 验 程 序 的 性 能 。 建 议 读 
者 将 服务 器 程序 3. 3 和 程序 2. 11 进行 对 比 学 习 。 

本 实例 的 技术 要 点 如 下 : 

(1) 借助 VS2010 的 MFC 应 用 程序 向 导 创 建 程序 框架 。 

(2) 从 CSocket 类 派生 用 户 自 定 义 的 套 接 字 类 。 

(3) 通过 CArchive 类 ,CSocketFile 类 , CSocket 类 实现 网 络 数据 交换 。 

(4) 本 例 实 现 了 多 客户 机 并 发 的 群 聊 功 能 ,在 服务 器 端 需要 用 链表 动态 管理 与 客户 机 
连接 的 套 接 字 ,实时 更 新 服务 器 和 客户 机 群 的 界面 显示 。 


3.3.2 创建 聊天 室 服 务 器 
聊天 室 服务 器 的 创建 与 3.2 节点 对 点 通信 服务 器 的 创建 类 似 , 下 面 进行 简要 介绍 。 
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1. 使 用 MFC 应 用 程序 向 导 创建 服务 器 程序 框架 


(D 启动 VS2010, 选 择 “ 文 件 一 新 建 一 项 目 ”命令 ,弹出 “新 建 项 目 ” 对 话 框 。 设 定 模 板 
为 MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名 称 、 解 决 方案 名 称 为 Server, 指 定 项 目 保存 位 
置 ,然后 单 击 “ 确 定 ” 按 钮 ,进入 MFC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 的 第 一 步 , 将 应 用 程序 类 型 设 定 为 “基于 对 话 框 ”。 

(3) 在 MFC 应 用 程序 向 导 的 第 二 步 ,设置 用 户 界面 的 初始 选项 。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 ,设置 高 级 功能 ,在 此 选择 “Windows 套 接 字 ” 复 
选 框 。 

(5) 在 MFC 应 用 程序 向 导 的 最 后 一 步 ,完成 CServerApp 和 CServerDlg 类 的 自动 创 
建 ,生成 的 解决 方案 如 图 3. 31 所 示 。 其 中 , ServerSocket. h、ServerSocket. cpp、 
ClientSocket. h,ClientSocket. cpp, Message. h, Message. cpp 是 后 面 利 用 MFC 类 向 导 添 加 
的 ,分 别 对 应 CServerSocket .CClientSocket .CMessage 3 个 类 的 定义 和 实现 。 


2. 创建 一 个 消息 类 CMessage, 用 于 表示 服务 器 与 客户 机 之 间 通 信 的 消息 结构 


联合 使 用 CArchive 类 、CSocketFile 类 、CSocket 类 实现 网 络 数据 的 交换 。 其 中 ， 
CArchive 类 要 求 将 可 序列 化 对 象 写 人 CSocketFile 对 象 或 从 中 读 取 可 序列 化 对 象 ,因此 需 
要 定义 一 个 消息 类 ,表示 客户 机 与 服务 器 通信 的 消息 结构 ,该 类 需要 从 CObject 类 派生 。 其 
创建 方法 如 下 : 

在 图 3. 31 所 示 的 服务 器 项 目 解决 方案 视图 中 右 击 项 目 名 称 Server, 在 快捷 菜单 中 选择 
“添加 一 类 ”命令 ,在 弹出 的 对 话 框 中 设 定 类 模板 为 “MFC 类 ”, 单 击 “ 添 加 ”按钮 ,在 MFC 添 
加 类 向 导 中 完成 CMessage 类 的 定义 ,如 图 3. 32 所 示 。 


MFC 添加 类 向 导 - Server 


图 3.31 服务 器 项 目 解决 方案 图 3.32 CMessage 类 的 定义 
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在 图 3. 31 中 大 家 可 以 看 到 自动 生成 的 Message. h 和 Message. cpp 文件 。 用 MFC 类 
向 导 为 CMessage 类 添加 成 员 变 量 和 成 员 函 数 , 其 代码 如 下 : 

CString m strMessage; // 字 符 串 消 息 

BOOL m bClosed; // 是 否 关闭 

virtual void Serialize(CArchive& ar);  // 重 载 基 类 序列 化 函数 


详情 参见 程序 3.3 文件 清单 。 
3. 为 服务 器 对 话 框 添加 控件 ,构建 程序 主 界面 


在 资源 视图 中 展开 Dialog 资源 条 目 , 双 击 IDD_SERVER_DIALOG ,在 工作 区 中 会 出 
现 一 个 对 话 框 ,借助 工具 箱 中 的 控件 ,将 程序 主 界面 设计 成 如 图 3. 33 所 示 的 布局 。 


m 网 络 聊天 室 服务 器 

| mwmsmace: emen BR ][wmewsm] | 

| WXEBAHA: | 

| | 

| | 

| 

| 

| | 
I 
l 
| 
| 

| | 

| | 

l 当前 在 贱 人 数 : 0 | 


图 3.33 聊天 室 服务 器 主 界面 
对 照 表 3. 10 设置 各 控件 的 属性 。 
表 3.10 聊天 室 服务 器 程序 主 对 话 框 中 各 控件 的 属性 


控件 ID 控件 标题 控件 类 型 
IDC_EDIT_SERVERPORT 无 编辑 框 Edit Control 
IDC LIST SROOM x 列表 框 List Box 
IDC_BUTTON_START 启动 服务 器 按钮 Button Control 
IDC_BUTTON_STOP 停止 服务 器 按钮 Button Control 
IDC_STATIC1 聊天 室 服务 器 大 厅 : 静态 文本 Static Text 
IDC_STATIC2 监听 服务 器 端口 号 : 静态 文本 Static Text 
IDC_STATIC_ONLINE 当前 在 线 人 数 : 0 静态 文本 Static Text 


4. 为 对 话 框 中 的 控件 对 象 定 义 相 应 的 成 员 变量 


在 解决 方案 资源 管理 器 中 的 项 目 名 称 Server 上 右 击 ,在 快捷 菜单 中 选择 “类 向 导 ” 命 
令 , 进 入 MFC 类 向 导 。 

切换 到 “成 员 变量 ”选项 卡 ,用 “添加 变量 ”按钮 为 表 3. 11 中 的 编辑 类 控件 定义 成 员 变 
量 。 图 3. 34 展示 的 是 完成 成 员 变 量 定 义 后 的 界面 。 
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表 3.11 聊天 室 服务 器 程序 主 对 话 框 中 控件 的 成 员 变 量 


控件 ID 对 应 成 员 变量 名 称 变量 类 型 取 值 范 
IDC_EDIT_SERVERPORT m_nServerPort int 1024 一 49 151 
IDC_LIST_SROOM m listSroom CListBox 
IDC STATIC ONLINE m staOnline CStatic 


T. [ICM 
D) 


ETTI TUN 
[ZTLZITNM 


TT?) 


LaL 


图 3.34. 定义 服务 器 对 话 框 中 控件 的 成 员 变量 


5. 创建 从 CSocket 类 派生 的 子 类 CServerSocket 和 CClientSocket, 处 理 与 客户 机 的 通信 


(1) 服务 器 应 创建 自己 的 套 接 字 类 ,负责 与 客户 机 的 通信 。 这 个 套 接 字 类 应 当 从 
CSocket 类 派生 ,并且 能 够 将 套 接 字 事 件 传递 给 对 话 框 类 CServerDlg ,在 对 话 框 类 中 编程 者 
可 以 自 定义 套 接 字 事件 处 理 函 数 。 

与 服务 器 程序 3. 2 不 同 的 是 ,这 里 需要 派生 两 个 套 接 字 类 一 一 CServerSocket 和 
CClientSocket。CServerSocket 用 于 侦 听 来 自 客户 机 的 连接 请 求 , 需 要 为 它 添加 On Accept 
事件 处 理 函 数 ; CClientSocket 用 于 与 客户 机 建立 连接 并 交换 数据 ,需要 为 它 添加 
OnReceive 事件 处 理 函 数 。 这 两 个 类 都 需要 添加 一 个 指向 主 对 话 框 类 的 指针 变量 。 

在 图 3. 31 所 示 的 解决 方案 资源 管理 器 中 右 击 项 目 名 称 Server, 在 快捷 菜单 中 选择 “ 添 
加 一 类 ”命令 ,进入 MFC 添加 类 向 导 , 设 定 类 名 为 CServerSocket、 基 类 为 CSocket, 如 图 3. 35 
所 示 。 

单 击 “ 完 成 ”按钮 ,系统 会 自动 生成 CServerSocket 类 对 应 的 头 文件 ServerSocket. h 和 
ServerSocket. cpp 文件 。 在 图 3. 31 所 示 的 解决 方案 资源 管理 器 中 读者 可 以 观察 到 这 个 变化 。 

(2) 使 用 MFC 类 向 导 完 善 CServerSocket 类 的 定义 。 在 解决 方案 资源 管理 器 中 右 击 
项 目 名 称 Server, 在 快捷 菜单 中 选择 “类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 将 类 名 称 选择 为 
CServerSocket, 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 ,从 左下 角 的 “ 虚 函 数 ” 列 表 框 中 选择 虚 函 数 


MFC 添加 类 向 导 - Server 


和 文件 四) 
ServerSocket h 
epp XE QD 
ServerSocket cpp 


图 3.35 在 服务 器 端 定义 派生 类 CServerSocket 


OnAccept, 单 击 “ 添 加 函数 ”按钮 ,将 这 个 虚 函 数 添 加 到 “已 重 写 的 虚 函 数 ” 列 表 框 中 。 这 样 ， 


就 为 自己 的 套 接 字 类 CServerSocket 完成 了 对 OnAccept 虚 函 数 的 重 载 ,定义 结果 如 图 3. 36 
所 示 。 


Server MD CServerSocket ` Amex |» 
Wm: piede ED: ET] 
am AERU: = 
命令 s EER RARE ME 
2J[ P) | emas, 

EERO EESNEARO: 
aaertyalid Ordccept IN 
Ond Er 
Wr WIEDER TCHLUORMI 

DL wr 


图 3.36 JH MFC 类 向 导 为 CServerSocket 重 载 OnAccept 虚 函 数 
上 述 操作 会 自动 在 ServerSocket. h 和 ServerSocket. cpp 文件 中 添加 相应 的 代码 定义 ， 
详情 可 参见 程序 3. 3。 
CD 为 套 接 字 类 CServerSocket 添加 成 员 变量 。 在 图 3. 36 所 示 的 MFC 类 向 导 中 切换 


到 ”成 员 变量 ”选项 卡 ,为 套 接 字 添加 一 个 私有 的 成 员 变量 , 它 是 指向 对 话 框 类 CServerDlg 
的 指针 ,其 代码 如 下 : 
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private: 


CServerDlg * m pDlg; // 指 向 服务 器 对 话 框 类 的 指针 
(4) 同样 ,利用 MFC 添加 类 向 导 派 生 CClientSocket 类 ,如 图 3. 37 所 示 。 


MFC 添加 类 向 导 - Server 


类 名 中 
olientSocket 

za 
Socket 


axe 
ClientSockst. h 
cpp XEO) 
ClientSocket. cpp 


图 3.37 在 Server 项 目 中 派生 CClientSocket 类 
利用 MFC 类 向 导 为 CClientSocket 类 添加 以 下 成 员 变 量 ,如 图 3. 38 所 示 。 


CServerDlg * m pDlg; // 定 义 指 向 主 对 话 框 类 的 指针 
CSocketFile* m pFile; // 定 义 指向 CSocketFile 对 象 的 指针 
CArchive * m_pArchiveIn; // 定 义 用 于 输入 的 CArchive 对 象 指针 
CRrchive * m pArchiveOut; // 定 义 用 于 输出 的 CArchive 对 象 指针 


> (ao I) 


Eee 


cientsocket. pC] 


说 明 : 


L we j[ wa J[ xm ] 


图 3.38 为 CClientSocket 类 添加 成 员 变 量 


第 3 章 ”MFC 套 接 字 编程 


利用 MFC 类 向 导 添 加 以 下 成 员 函 数 ,如 图 3. 39 所 示 。 


void Init(void); // 初 始 化 
void SendMessage(CMessage * pMsg); // 发 送 消 息 
void ReceiveMessage(CMessage * pMsg); // 接 收 消息 
// 重 载 回调 函数 , 当 套 接 字 收 到 数据 时 , 自动 调用 此 函数 
virtual void OnReceive(int nErrorCode); 


g 
m 
RF 

命令 | 消息 EER ERTE 方法 


Ami... 
[7792713] 
Creo 
Cermo | 


TED: 
方法 名 称 


图 3. 39 为 CClientSocket 类 添加 成 员 函 数 


利用 MFC 类 向 导 完 成 上 述 操 作 , 自动 生成 的 代码 会 反映 到 ClientSocket. h 和 
ClientSocket. cpp 文件 ,详情 参见 程序 3. 3 文件 清单 。 

(5) 手工 添加 其 他 代码 。 

对 于 ServerSocket. h ,在 文件 开头 添加 对 话 框 类 CServerDlg 的 声明 ,其 代码 如 下 : 

class CServerDlg; // 声 明 服 务 器 对 话 框 类 

对 于 ServerSocket. cpp 文件 ,有 以 下 4 处 添加 。 

CD 在 文件 头 ,添加 对 话 框 类 的 头 文件 : 

# include "ServerD1g. h" // 手 动 添加 

© 在 构造 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 初始 化 代码 : 

m_pD1g = NULL; 

© 在 析 构 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 置 空 代码 : 

m_pDlg = NULL; 

@ 为 成 员 函 数 OnAccept 添加 业务 逻辑 代码 ,详情 参见 程序 3. 3。 事 实 上 ,在 OnAccept K 
数 中 不 做 具体 操作 ,只 包含 语句 “m_pDlg 一 二 onAccept();”。 

这 个 语句 控制 程序 逻辑 转 到 对 话 框 类 中 进行 处 理 ,后 面 在 对 话 框 类 的 onAccept() 函数 
中 完成 具体 的 业务 处 理 。 
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对 于 ClientSocket. h, 在 文件 开头 添加 对 话 框 类 CServerDlg 和 消息 类 CMessage 的 声 
明 , 其 代码 如 下 : 


class CServerDlg; // 声 明 服 务 器 对 话 框 类 


class CMessage; 


对 于 ClientSocket. cpp 文件 ,有 以 下 4 处 添加 。 
CD 在 文件 头 , 添 加 对 话 框 类 的 头 文件 : 


# include "ServerD1g. h" // 手 动 添加 包含 语句 

# include "Message. h" // 手 动 添加 包含 语句 

© 在 构造 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 初始 化 代码 : 
// 初 始 化 成 员 变量 ,手动 添加 


m_pD1g = pDlg; 
m_pFile = NULL; 

m pArchiveIn = NULL; 
m pArchiveOut = NULL; 


© 在 析 构 函数 中 ,添加 对 话 框 指针 成 员 变量 的 置 空 代 码 : 


// 置 空 或 释放 成 员 变 量 ,手动 添加 

m_pD1g = NULL; 

if (m pFile! - NULL) delete m pFile; 

if (m pArchiveIn! = NULL) delete m pArchiveIn; 
if (m pArchiveOut! = NULL) delete m pArchiveOut; 


CD 为 成 员 函 数 Init, OnReceive, SendMessage, ReceiveMessage š Jill My $ 32 48 (C 03, TE 
情 参见 程序 3.3, 


6. 为 对 话 框 类 CServerDlg 中 的 两 个 按钮 控件 添加 单 击 事件 处 理 函 数 
函数 定义 参见 表 3.12. 
表 3.12 聊天 室 服务 器 程序 主 对 话 框 中 按钮 控件 的 事件 响应 函数 


控件 ID m B 成 员 函 数 (响应 函数 ) 
IDC_BUTTON_START BN_CLICKED OnClickedButtonStart 
IDC BUTTON STOP BN CLICKED OnClickedButtonStop 


这 一 步 操作 可 以 用 MFC 类 向 导 自 动 完 成 。 如 图 3. 40 Bros ,选择 类 名 为 CServerDlg. 
然后 切换 到 “命令 ”选项 卡 , 在 左下 角 选 择 按钮 控件 对 应 的 ID, 在 中 间 消 息 列 表 框 中 选择 消 
息 BN_CLICKED, 单 击 “ 添 加 处 理 程序 ”按钮 ,添加 成 员 函 数 到 下 面 的 列表 框 中 。 接 着 单 
击 “ 确 定 ” 按 钮 , 则 所 有 操作 会 自动 反映 到 ServerDlg. h 和 ServerDlg. cpp 中 ,详情 参见 程 
序 3.3。 


7. 为 CServerDlg 类 添加 与 套 接 字 关联 的 成 员 变量 和 成 员 函 数 


用 MFC 类 向 导 添 加 成 员 变量 ,其 代码 如 下 : 


CServerSocket * m pServerSocket; // 侦 听 套 接 字 指针 变量 
CPtrList m ClientsList; // 在 线 客户 机 链表 
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图 3. 40 为 ServerDlg 类 定义 按钮 单 击 事件 响应 函数 
用 MFC 类 向 导 添 加 下 面 的 3 个 成 员 函 数 : 


void onRccept(void);// 处 理 客户 机 连接 请 求 , 从 CServerSocket 类 的 OnAccept 函数 转 到 此 处 执行 

void onReceive(CClientSocket * pSocket); // 获 取 客 户 机 发 送 的 数据 ,从 CClientSocket 类 的 
//OnReceive 函数 转 到 此 处 执行 

void sendToClients(CMessage * pMsg); // 服 务 器 向 所 有 客户 机 转发 消息 


借助 向 导 完 成 的 操作 会 自动 反映 到 ServerDlg. h 和 ServerDlg. cpp 中 。 
8. 手工 添加 部 分 代码 


在 ServerDlg. h 文件 头 部 添加 对 于 ServerSocket. h 的 包含 命令 ,以 获得 对 套 接 字 的 访 


问 支持 ,其 代码 如 下 : 


# include "ServerSocket. h" 
# include "Message. h" // 手 动 添加 包含 语句 


在 ServerDlg. cpp 文件 中 添加 对 控件 成 员 变 量 的 初始 化 代码 : 
BOOL CServerDlg: :OnInitDialog() 
{ 

// 系 统 自动 生成 的 代码 此 处 省 略 


//'T0DO: 在 此 处 添加 额外 的 初始 化 代码 
m nServerPort = 10000; 


UpdateData(FALSE) ; // 用 成 员 变量 值 更 新 界面 
GetDlgItem(IDC BUTTON STOP) — > EnableWindow(FALSE) ; 
return TRUE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE. 


) 
9. 手工 添加 事件 函数 和 成 员 函 数 业务 逻辑 代码 


在 Message. cpp 中 完善 CMessage 的 成 员 函 数 代 码 , 在 ServerSocket. cpp 文件 中 完善 
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3.3.3 聊天 室 服务 器 代码 分 析 
如 图 3. 31 解决 方案 视图 所 展示 的 那样 ,应 用 程序 Server. h 和 Server. cpp 对 应 


CServerApp 类 的 定义 和 实现 ,完全 由 VC++ 2010 的 MFC 218] S A 3) 61 8 
目的 入 口 文件 ,编程 者 不 需 做 任何 改动 。Resource. h stdafx. h stdafx. cpp, targetver. h 等 
由 系统 自动 生成 ,不 需要 改动 。 


CServerSocket 的 事件 处 理 函 数 代码 ,在 ClientSocket. cpp 文件 中 完善 CClientSocket 的 事 
件 处 理 函数 代码 ,在 ServerDlg. cpp 中 完善 CServerDlg 的 事件 处 理 函 数 和 成 员 函 数 代码 ， 
详情 参见 程序 3. 3 。 


,它们 是 整个 项 


下 面 重点 给 出 Message. h, Message. cpp, ServerSocket. h ,ServerSocket. cpp.ClientSocket. h, 


程序 3.3 ”聊天 室 服务 器 完整 代码 
(D Message. h 文件 清单 : 


//CMessage 定义 


# pragma once 
class CMessage : public CObject 
( 
public: 
CMessage() ; 
virtual —CMessage() ; 
CString m strMessage; 
BOOL m bClosed; 
virtual void Serialize(CArchive& ar); 


}; 
(2) Message. cpp 文件 清单 : 
//Message. cpp: 实现 文件 


# include "stdafx. h" 
# include "Server.h" 
# include "Message. h" 


CMessage: : CMessage( ) 
( 
m strMessage - T(""); 
m bClosed = FALSE; 
) 
CMessage: : —CMessage( ) 
ü 


//CMessage 成 员 函 数 
// 类 向 导 自 动 添加 
void CMessage: :Serialize(CArchive& ar) 
( 
if (ar.IsStoring()) 
t 
ar««(WORD)m bClosed; 


ClientSocket. cpp, ServerDlg. h 和 ServerDlg. cpp 这 8 个 文件 的 清单 。 


// 字 符 串 消 息 
// 是 否 关 闭 
// 重 载 基 类 序列 化 函数 


// 类 向 导 自 动 添加 
// 手 动 添加 


// 发 送 数 据 代 码 , 手 动 添加 
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ar««m strMessage; 


) 


else 

t // 接 收 数据 代码 ,手动 添加 
WORD wd; 
ar >> wd; 


m_bClosed = (BOOL)wd; 
ar»»m strMessage; 
) 
} 


(3) ServerSocket. h 文件 清单 : 


//CServerSocket 定义 


# pragma once 
class CServerDlg; // 声 明 服 务 器 对 话 框 类 
class CServerSocket : public CSocket 
{ 
public: 
CServerSocket(CServerDlg * pDlg); // 添 加 入 口 参 数 
virtual —CServerSocket() ; 
// 回 调 函 数 , 当 套 接 字 收 到 连接 请 求 时 , 自动 调用 此 函数 
virtual void OnAccept(int nErrorCode); 
CServerDlg * m pDlg; // 指 向 服务 器 对 话 框 类 的 指针 
}; 


(4) ServerSocket. cpp 文件 清单 : 
//ServerSocket. cpp: 实现 文件 


# include "stdafx. h" 
# include "Server. h" 
* include "ServerSocket. h" 
# include "ServerDlg. h" // 手 动 添加 
CServerSocket::CServerSocket(CServerDlg * pDlg) 
{ 
m_pDlg = pDlg; // 初 始 化 成 员 变量 


CServerSocket: :一 CServerSocket() 
{ 

m_pDlg = NULL; 
} 


//CServerSocket 成 员 函 数 
void CServerSocket: :OnAccept(int nErrorCode) 
{ 
//0D0: 在 此 添加 专用 代码 或 调用 基 类 
CSocket : :OnAccept (nErrorCode) ; 
m pDlg-» onAccept() ; // 调 用 主 对 话 框 中 的 处 理 函 数 
) 


(5) ClientSocket. h 文件 清单 : 


//CClientSocket 定义 
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# pragma once 
class CServerDlg; 
class CMessage; 


class CClientSocket : public CSocket 

{ 

public: 
CClientSocket(CServerDlg * pDlg); // 为 构造 函数 增加 入 口 参数 
virtual —CClientSocket(); 


// 重 载 回调 函数 , 当 套 接 字 收 到 数据 时 , 自动 调用 此 函数 
virtual void OnReceive(int nErrorCode); 


CServerDlg * m pDlg; // 定 义 指向 主 对 话 框 类 的 指针 
CSocketFile* m pFile; // 定 义 指向 CSocketFile 对 象 的 指针 
Chrchive* m pArchiveIn; // 定 义 指向 输入 CArchive 对 象 的 指针 
CArchive* m pArchiveOut; // 定 义 指向 输出 CArchive 对 象 的 指针 
void SendMessage(CMessage * pMsg); // 发 送 消息 

void ReceiveMessage(CMessage * pMsg); ”// 接 收 消息 

void Init(void); // 初 始 化 


}; 
(6) ClientSocket. cpp 文件 清单 : 
//ClientSocket. cpp: 实现 文件 


# include "stdafx. h" 
# include "Server. h" 
# include "ClientSocket. h" 


# include "ServerDlg. h" // 手 动 添加 包含 语句 

# include "Message. h" // 手 动 添加 包含 语句 
//CClientSocket 
CClientSocket: :CClientSocket(CServerDlg * pDlg)// 增 加 入 口 参数 ,手动 添加 
{ // 初 始 化 成 员 变量 ,手动 添加 

m pDlg- pDlg; 

m pFile- NULL; 


m pArchiveIn = NULL; 
m pArchiveOut = NULL; 
) 


CClientSocket: :一 CClientSocket() 
{ 
// 置 空 或 释放 成 员 变量 ,手动 添加 
m_pD1g = NULL; 
if (m pFile!= NULL) delete m pFile; 
if (m pArchiveIn!- NULL) delete m pArchiveIn; 
if (m pArchiveOut!- NULL) delete m pArchiveOut; 
) 


//CClientSocket 成 员 函 数 
// 套 接 字 收 到 数据 时 , 自动 调用 此 函数 
void CClientSocket: :OnReceive( int nErrorCode) 


{ 
//'T0DO: 在 此 添加 专用 代码 或 调用 基 类 
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CSocket : :OnReceive(nErrorCode); 
m_pD1g —> onReceive(this) ; // 调 用 主 对 话 框 中 的 处 理 函 数 ,手动 添加 
) 


void CClientSocket: :Init(void) 
t // 手 动 添加 初始 化 代码 
m pFile= new CSocketFile(this, TRUE) ; 
m pArchiveIn- new CArchive(m pFile, Archive: : load); 
m pArchiveOut - new CArchive(m pFile,CArchive::store); 
) 
// 发 送 消息 
void CClientSocket: :SendMessage(CMessage * pMsg) 
{ 
// 手 动 添加 
if (m pArchiveOut!- NULL) 
{ 
pMsg -> Serialize( * m pArchiveOut) ; 
m pArchiveOut - > Flush(); 
) 
) 
// 接 收 消息 
void CClientSocket: :ReceiveMessage(CMessage * pMsg) 
{ 
pMsg — > Serialize( * m pArchiveIn); 
) 


(7) ServerDlg. h 文件 清单 : 
//ServerDlg.h: 头 文件 


# pragma once 
# include "ServerSocket.h" 
# include "ClientSocket.h" 


class CMessage; 


//CServerD1g 对 话 框 
class CServerDlg : public CDialogEx 
{ 
public: 
CServerDlg(CWnd* pParent = NULL);  ”// 标 准 构 造 函 数 
// 对 话 框 数据 
enum ( IDD = IDD SERVER DIALOG }; 
protected: 
virtual void DoDataExchange(CDataExchange * pDX); //DDX/DDV 支持 


protected: 
HICON m hIcon; 


// 生 成 的 消息 映射 函数 

virtual BOOL OnInitDialog(); 

afx msg void OnSysCommand(UINT nID, LPARAM lParam); 
afx msg void OnPaint(); 

afx msg HCURSOR OnQueryDragIcon(); 

DECLARE MESSAGE MAP() 
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// 以 下 代码 通过 类 向 导 自 动 添加 
public: 
int m nServerPort; 
CListBox m listSroom; 
CStatic m staOnline; 
afx msg void OnClickedButtonStart(); 
afx msg void OnClickedButtonStop(); 
CServerSocket * m pServerSocket; // 侦 听 套 接 字 指针 变量 
CPtrList m ClientsList; // 在 线 客户 机 链表 
void onAccept(void); 
// 处 理 客户 机 连接 请 求 , 从 CServerSocket 类 的 OnAccept 函数 转 到 此 处 执行 
void onReceive(CClientSocket x pSocket); // 获 取 客 户 机 发 送 的 数据 , 从 CClientSocket 类 的 
//OnReceive 函数 转 到 此 处 执行 
void sendToClients(CMessage * pMsg); // 服 务 器 向 所 有 客户 机 转发 消息 
}; 


(8) ServerDlg. cpp 文件 清单 : 
//ServerD1g. cpp: 实现 文件 


# include "stdafx. h" 

# include "Server. h" 

# include "ServerDlg. h" 

# include "afxdialogex. h" 

# include "Message. h" // 手 动 添加 包含 语句 


// 用 于 应 用 程序 “关于 ”菜单 项 的 CAboutDlg 对 话 框 
class CAboutDlg : public CDialogEx 
( 
public: 
ChboutDlg(); 
// 对 话 框 数据 
enum { IDD = IDD ABOUTBOX ); 
protected: 
virtual void DoDataExchange(CDataExchange * pDX); — //DDX/DDV 支持 
protected: 
DECLARE MESSAGE MAP() 
}; 


ChboutDlg::CAboutDlg() : CDialogEx(CAboutDlg: : IDD) 
ü 


void CAboutDlg::DoDataExchange(CDataExchange * pDX) 
( 

CDialogEx: :DoDataExchange(pDX); 
) 


BEGIN MESSAGE MAP(CAboutDlg, CDialogEx) 
END MESSAGE MAP() 


//CServerDlg 对 话 框 

CServerDlg::CServerDlg(CWnd * pParent /* = NULL * /) 
: CDialogEx(CServerDlg::IDD, pParent) 

{ 
m hIcon = AfxGetApp() -> LoadIcon(IDR MAINFRAME); 
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m nServerPort = 0; // 类 向 导 添 加 的 成 员 变 量 初始 化 代码 
m pServerSocket = NULL; // 手 动 添加 
} 


void CServerDlg::DoDataExchange(CDataExchange * pDX) 
( 
CDialogEx: :DoDataExchange(pDX) ; 
DDX Text(pDX, IDC EDIT SERVERPORT, m nServerPort); 
DDV MinMaxInt(pDX, m nServerPort, 1024, 49151); 
DDX Control(pDX, IDC LIST SROOM, m listSroom); 
DDX Control(pDX, IDC STATIC ONLINE, m sta0nline); 
1] 


BEGIN MESSAGE MAP(CServerDlg, CDialogEx) 

ON WM SYSCOMMAND( ) 

ON WM PAINT() 

ON WM QUERYDRAGICON() 

ON BN CLICKED(IDC BUTTON START, &CServerDlg: :OnClickedButtonStart) 
ON BN CLICKED(IDC BUTTON STOP, &CServerDlg: :OnClickedButtonStop) 
END MESSAGE MAP() 


//CServerDlg 消息 处 理 程序 
BOOL CServerDlg: :OnInitDialog() 
( 

CDialogEx: :OnInitDialog(); 


// 将 “关于 ?菜单 项 添加 到 系统 菜单 中 


//1DM ABOUTBOX 必须 在 系统 命令 范围 内 
ASSERT((IDM ABOUTBOX & 0xFFF0) == IDM ABOUTBOX); 
ASSERT(IDM ABOUTBOX < OxF000); 
CMenu* pSysMenu = GetSystemMenu(FALSE) ; 
if (pSysMenu != NULL) 
{ 
BOOL bNameValid; 
CString strAboutMenu; 
bNameValid - strAboutMenu. LoadString(IDS ABOUTBOX); 
ASSERT(bNameValid); 
if (!strAboutMenu. IsEnpty() ) 
{ 
pSysMenu 一 > AppendMenu(MF SEPARATOR); 
pSysMenu- > AppendMenu(MF STRING, IDM ABOUTBOX, strAboutMenu); 


) 


// 设 置 此 对 话 框 的 图 标 , 当 应 用 程序 主 窗口 不 是 对 话 框 时 ,框架 将 自动 执行 此 操作 
SetIcon(m_hIcon, TRUE); // 设 置 大 图 标 
SetIcon(m_hIcon, FALSE); // 设 置 小 图 标 


//TOD0: 在 此 添加 额外 的 初始 化 代码 

m nServerPort = 10000; 

UpdateData(FALSE) ; // 用 成 员 变量 值 更 新 界面 

GetDlgItem(IDC BUTTON STOP) 一 > EnableWindow(FALSE); 

return TRUE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE. 
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) 


void CServerDlg::OnSysCommand(UINT nID, LPARAM lParam) 
ç 
if ((nID & OxFFFO) == IDM_ABOUTBOX) 
{ 
CAboutDlg dlgAbout; 
digAbout. DoModal(); 
) 
else 
{ 
CDialogEx::OnSysCommand(nID, lParam); 
} 
Jj 


// 如 果 向 对 话 框 添加 最 小 化 按钮 , 则 需要 下 面 的 代码 
// 来 绘制 该 图 标 .对 于 使 用 文档 /视图 模型 的 MEC 应 用 程序 ， 
// 这 将 由 框架 自动 完成 
void CServerDlg: :OnPaint() 
( 

if (IsIconic()) 

{ 

CPaintDC dc(this); // 用 于 绘制 的 设备 上 下 文 


SendMessage(WM ICONERASEBKGND, reinterpret cast < WPARAM»(dc.GetSafeHdc()), 0); 
// 使 图 标 在 工作 区 矩形 中 居中 


int cxIcon = GetSystemMetrics(SM CXICON) ; 
int cyIcon = GetSystemMetrics(SM CYICON); 


CRect rect; 

GetClientRect(&rect); 

int x = (rect.Width() - cxIcon + 1)/2; 
int y = (rect.Height() — cyIcon + 1)/2; 
// 绘 制图 标 


dc.DrawIcon(x, y, m hlIcon); 


) 
else 
{ 
CDialogEx: :OnPaint(); 
) 
) 


// 当 用 户 拖 动 最 小 化 窗口 时 , 系统 调用 此 函数 取得 光标 显示 
HCURSOR CServerD1g: :OnQueryDragIcon() 
( 

return static cast < HCURSOR»(m hlcon); 


) 


// 单 击 启动 服务 器 按钮 的 事件 处 理 函 数 
void CServerD1g: :OnClickedButtonStart() 
( 
//10D0: 在 此 添加 控件 通知 处 理 程序 代码 
UpdateData( TRUE) ; // 获 得 用 户 输入 给 成 员 变量 
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// 创 建 服务 器 套 接 字 对 象 ,用 于 在 指定 端口 侦 听 
m pServerSocket = new CServerSocket(this); 
if (!m pServerSocket -> Create(m nServerPort)) 
t 
// 错 误 处 理 
delete m pServerSocket; 
m pServerSocket - NULL; 
RfxMessageBox(LPCTSTR(" 创 建 服务 器 侦 听 套 接 字 出 现 错误 !")); 
return; 
) 
// 启 动 服务 器 侦 听 套 接 字 ,可 以 随时 接收 来 自 客户 机 的 请 求 
if (!m pServerSocket - » Listen()) 
t 
// 错 误 处 理 
delete m pServerSocket; 
m pServerSocket - NULL; 
AfxMessageBox(LPCTSTR(" 启 动 服 务 器 侦 听 套 接 字 出 现 错误 !")); 
return; 
} 
GetDlgItem(IDC EDIT SERVERPORT) 一 > EnableWindow( FALSE) ; 
GetDlgItem(IDC BUTTON START) — > EnableWindow(FALSE); 
GetDlgItem(IDC BUTTON STOP) — > EnableWindow(TRUE); 
) 


// 单 击 停止 服务 器 按钮 的 事件 处 理 函 数 
void CServerDlg: :OnClickedButtonStop() 
( 
//0D0: 在 此 添加 控件 通知 处 理 程序 代码 
CMessage msg; 
nsg.m strMessage = "服务 器 已 停止 侦 听 服 务 !"; 
delete m pServerSocket; // 释 放 服 务 器 侦 听 套 接 字 
m pServerSocket = NULL; 
// 清 除 客 户 机 连接 列表 
while(!m ClientsList. IsEnpty()) 


{ 
// 向 每 一 个 客户 机 发 送 "服务 器 已 停止 侦 听 服务 ! "消息 并 从 列表 中 删除 连接 , 释放 资源 


CClientSocket * pSocket = (CClientSocket * )m_ClientsList. RemoveHead( ) ; 
pSocket - > SendMessage(&nsg) ; 
delete pSocket; 
) 
// 清 除 服务 器 聊天 室 大 厅 
while(m listSroom. GetCount()!= 0) 
m_listSroom. DeleteString(0); 
GetDlgItem(IDC EDIT SERVERPORT) — > EnableWindow( TRUE); 
GetDlgItem(IDC BUTTON START) 一 > EnableWindow( TRUE); 
GetDlgItem(IDC BUTTON STOP) - > EnableWindow(FALSE); 
) 


// 服 务 器 处 理 来 自 客户 机 的 连接 请 求 并 在 服务 器 端 维护 一 个 连接 列表 
void CServerDlg: :onAccept (void) 
{ 

// 创 建 服务 器 端 连 接客 户 机 的 套 接 字 

CClientSocket * pSocket = new CClientSocket(this); 

if (m pServerSocket -> Accept( * pSocket)) 
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// 建 立 客户 机 连接 ,加 入 客户 机 连接 列表 
pSocket -> Init(); 
m_ClientsList. AddTail(pSocket); 
// 更 新 在 线 人 数 
CString strTemp; 
strTemp. Format(_T(" 当 前 在 线 人 数 : $d"),m ClientsList.GetCount()); 
m_sta0nline. SetWindowTextW( strTemp); 
jelse 
{ 
delete pSocket; 
pSocket = NULL; 
) 
) 


// 服 务 器 处 理 来 自 客户 机 的 消息 
void CServerDlg::onReceive(CClientSocket * pSocket) 
{ 


static CMessage msg; 


do { 
pSocket — > ReceiveMessage(&nsg) ; // 接 收 消息 
m listSroom.AddString(msg.m strMessage); // 加 入 服务 器 列表 框 
sendToClients(&msg) ; // 转 发 给 所 有 客户 机 


// 如 果 客户 机 关闭 , 从 连接 列表 中 删除 服务 器 端 与 之 会 话 的 连接 套 接 字 
if (msg.m bClosed) 
{ 
pSocket -> Close(); 
POSITION pos, temp; 
for(pos = n ClientsList. GetHeadPosition();pos!- NULL; ) 
{ 
temp = pos; 
CClientSocket * pTempSocket = (CClientSocket * )m ClientsList.GetNext(pos); 
if (pTempSocket -- pSocket) 
t 
m ClientsList. RemoveAt (temp) ; 
CString strTemp; 
// 更 新 在 线 人 数 
strTemp. Format(_T(" 当 前 在 线 人 数 : % d"),m_ClientsList.GetCount()); 
m_sta0nline. SetWindowTextW( strTemp); 
break; 
}// 结 束 二 判断 
}// 结 束 for 循环 
delete pSocket; 
pSocket = NULL; 
break; 
}// 寺 判断 
}while(!pSocket ->m_phrchiveIn -> IsBufferEmpty()); 
) 


// 服 务 器 向 所 有 客户 机 转发 来 自 某 一 客户 机 的 消息 
void CServerDlg::sendToClients(CMessage * pMsg) 
{ 
for (POSITION pos =m ClientsList.GetHeadPosition();pos!- NULL; ) 
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{ 
CClientSocket * pSocket = (CClientSocket * )m ClientsList.GetNext(pos); 
pSocket - > SendMessageli( pMsg) ; 
} 
} 


服务 器 程序 运行 的 初始 界面 如 图 3. 41 所 示 。 


5 网 络 聊天 室 服务 器 


申 听 服务 器 端口 号 : 10000 


BERERSBXT: 


图 3. 41 服务 器 程序 运行 初始 界面 


3.3.4 创建 聊天 室 客户 机 


聊天 室 客 户 机 的 创建 步骤 与 程序 3. 1 类似 ,编程 环境 使 用 VC++ 2010, 下 面 简要 介绍 创 
建 客户 机 的 步骤 。 


1. 使 用 MFC 应 用 程序 向 导 创 建 客户 机 程序 框架 


CD 启动 VS2010, 选 择 “ 文 件 一 新 建 一 项 目 ”" 命 令 , 弹 出 “新 建 项 目 ” 对 话 框 。 设 定 模 板 
为 MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名 称 、 解 决 方 案 名 称 为 Client, 并 指定 项 目 保存 
位 置 ,然后 单 击 “ 确 定 ” 按 钮 ,进入 MEC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 的 第 一 步 , 将 应 用 程序 类 型 设 定 为 “基于 对 话 框 ”。 

(3) 在 MFC 应 用 程序 向 导 的 第 二 步 ,设置 用 户 界面 选项 。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 ,设置 高 级 功能 ,在 此 选择 “Windows 套 接 字 ” 复 
选 框 。 

(5) 在 MFC 应 用 程序 向 导 的 最 后 一 步 ,观察 生成 的 类 CClientApp 和 CClientDlg。 然 
后 单 击 “ 完 成 ”按钮 ,完成 应 用 程序 框架 的 创建 ,生成 Client 项 目 解决 方案 。 


2. 为 客户 机 对 话 框 添加 控件 ,构建 程序 主 界面 


在 资源 视图 中 展开 Dialog 资源 条 目 , 双 击 IDD_CLIENT_DIALOG ,在 工作 区 中 会 出 现 
一 个 对 话 框 ,借助 工具 箱 中 的 控件 ,将 程序 主 界面 设计 成 如 图 3. 42 所 示 的 布局 。 
图 3. 42 中 各 控件 的 定义 如 表 3. 13 所 示 。 
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图 3.42 客户 机 程序 界面 布局 
表 3.13 聊天 室 客 户 机 程序 主 对 话 框 中 控件 的 属性 


控件 ID 控件 标题 控 件 类 型 
IDC_EDIT_USERNAME 编辑 框 Edit Control 
IDC_EDIT_SERVERNAME 编辑 框 Edit Control 
IDC_EDIT_SERVERPORT 编辑 框 Edit Control 
IDC_EDIT_SPEAKING 编辑 框 Edit Control 
IDC_LIST_CROOM 列表 框 List Box 
IDC_BUTTON_LOGIN 登录 按钮 Button Control 
IDC_BUTTON_LOGOUT 退出 按钮 Button Control 
IDC BUTTON SPEAK Li 按钮 Button Control 
IDC STATICI 客户 昵称 : 静态 文本 Static Text 
IDC_STATIC2 服务 器 名 : 静态 文本 Static Text 
IDC_STATIC3 Nn. 静态 文本 Static Text 
IDC STATIC4 我 想 说 : 静态 文本 Static Text 
IDC_STATIC5 聊天 室 大 厅 : 静态 文本 Static Text 


3. 为 对 话 框 中 的 控件 对 象 定义 相应 的 成 员 变 量 


用 MFC 类 向 导 为 表 3. 14 中 的 控件 定义 成 员 变量 ,完成 后 如 图 3. 43 所 示 。 
表 3.14 聊天 室 客户 机 程序 主 对 话 框 中 控件 的 成 员 变量 
控件 ID 成 员 变量 名 称 变量 类 型 取 值 范围 


IDC_EDIT_USERNAME m_strUserName CString 
IDC_EDIT_SERVERNAME m strServerName CString 

IDC EDIT SERVERPORT m. nServerPort int 1024—49 151 
IDC EDIT SPEAKING m strSpeaking CString 

IDC LIST CROOM m listCRoom CListBox 


4. 创建 从 CSocket 类 派生 的 子 类 CClientSocket, 处 理 与 服务 器 的 通信 
(1) 客户 机 应 创建 自己 的 套 接 字 类 ,负责 与 服务 器 的 通信 。 这 个 套 接 字 类 应 当 从 
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CSocket 类 派生 ,并 且 能 够 将 套 接 字 事件 传递 给 对 话 框 类 CClientDlg, 在 对 话 框 类 中 编程 者 
可 以 自 定义 套 接 字 事件 处 理 函 数 。 

在 解决 方案 资源 管理 器 中 右 击 项 目 名 称 Client, 在 快捷 菜单 中 选择 “添加 一 类 ”命令 , 进 
入 MFC 添加 类 向 导 , 设 定 类 名 为 CClientSocket、 基 类 为 CSocket, 单 击 “ 完 成 "按钮 ,系统 会 
自动 生成 CClientSocket 类 对 应 的 头 文件 ClientSocket. h 和 ClientSocket. cpp 文件 。 在 解 
决 方案 资源 管理 器 中 用 户 可 以 观察 到 这 个 变化 。 

(2) 使 用 MFC 类 向 导 完 善 CClientSocket 类 的 定义 。 在 解决 方案 资源 管理 器 中 右 击 项 
目 名 称 Client. 在 快捷 菜单 中 选择 “类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 将 类 名 称 选择 为 
CClientSocket, 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 , 从 左下 角 的 “ 虚 函 数 ” 列 表 框 中 选择 虚 函 数 
OnReceive, 单 击 “ 添 加 函数 ”按钮 ,将 这 个 虚 函 数 添加 到 “已 重 写 的 虚 函 数 ” 列 表 框 中 。 这 
样 ,就 为 自己 的 套 接 字 类 CClientSocket 完成 了 OnReceive 虚 函 数 的 重 载 。 

上 述 操 作 会 自动 在 ClientSocket. h 和 ClientSocket. cpp 文件 中 添加 相应 的 代码 定义 ， 
详情 可 参见 程序 3. 4。 

G) 为 套 接 字 类 CClientSocket 添加 一 般 的 成 员 函 数 和 成 员 变量 。 为 套 接 字 添加 一 个 
私有 的 成 员 变 量 , 它 是 指向 对 话 框 类 CClientDlg 的 指针 ,其 代码 如 下 : 


private: 
CClientDlg * m pDlg; 


(4) 手工 添加 其 他 代码 。 对 于 ClientSocket. h, 在 文件 开头 添加 对 话 框 类 CClientDlg 
的 声明 ,其 代码 如 下 : 

class CClientDlg; // 对 话 框 类 声明 ,手动 添加 

对 于 ClientSocket. cpp 文件 ,有 以 下 4 处 添加 。 

CD 在 文件 头 , 添 加 对 话 框 类 的 头 文件 : 

# include "ClientDlg. h" // 手 动 添加 的 包含 语句 

© 在 构造 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 初始 化 代码 : 

m_pD1g = NULL; 

© 在 析 构 函数 中 ,添加 对 话 框 指针 成 员 变 量 的 园 空 代码 : 

m_pD1g = NULL; 

@ 为 成 员 函 数 OnReceive 添加 业务 逻辑 代码 : 

// 事 件 处 理 函 数 , 当 客户 端 套 接 字 收 到 FD. READ 消息 时 执行 此 函数 


void CClientSocket: :OnReceive(int nErrorCode) 
{ 
//0D0: 在 此 添加 专用 代码 或 调用 基 类 
CSocket : :OnReceive(nErrorCode) ; 
// 调 用 CClientDlg 类 的 onReceive() 函数 处 理 
if (nErrorCode == 0) m_pDlg -> onReceive(); 


5. 为 对 话 框 类 CClientDlg 中 的 控件 添加 事件 处 理 函 数 
函数 定义 参见 表 3.15. 
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表 3.15 聊天 室 客 户 机 程序 主 对 话 框 中 控件 的 事件 响应 函数 


控件 ID 消 息 成 员 函 数 (响应 函数 ) 
IDC BUTTON LOGIN BN CLICKED OnClickedButtonLogin 
IDC BUTTON LOGOUT BN CLICKED OnClickedButtonLogout 
IDC BUTTON SPEAK BN CLICKED OnClickedButtonSpeak 
IDD CLIENT DIALOG WM DESTROY OnDestroy 


上 述 操作 仍 可 用 MFC 类 向 导 自 动 完成 。 
6. 为 CClientDIg 类 添加 与 套 接 字 关联 的 成 员 变 量 和 成 员 函 数 
用 MFC 类 向 导 添 加 以 下 成 员 变 量 ,完成 后 如 图 3. 43 所 示 。 


CClientSocket * m pSocket; 
CSocketFile * m pFile; 
CArchive* m pArchiveIn; 
CArchive * m pArchiveOut; 


用 MFC 类 向 导 添 加 下 面 3 ARR PRG: 


void onReceive(void); 
void ReceiveMessage(void); 
void SendMyMessage(CString& strMessage, BOOL bClosed) 


ESI 
E (ChientDig 


CDialosEx ZERAT): [clientdle.h CG] 
100, CLIENT. DIALOG RERO: (clientdlg. cop. 9 
$e DAR EER RARE 方法 


条 加 变量 (4) 
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说 明 : CArchive* 自 定义 变量 


图 3.43 用 MFC 类 向 导 添 加 控件 成 员 变 量 和 自 定义 成 员 变量 


7. 创建 一 个 消息 类 CMessage, 用 于 表示 客户 机 与 服务 器 通信 的 消息 结构 


联合 使 用 CArchive 类 、CSockFile 类 、CSocket 类 实现 网 络 数据 的 交换 。 由 于 CArchive 
类 要 求 将 可 序列 化 对 象 写 人 CSockFile 对 象 或 从 中 读 取 可 序列 化 对 象 , 因 此 需要 定义 一 个 


消息 类 ,表示 客户 机 与 服务 器 通信 的 数据 结构 ,该 类 需要 从 CObject 类 派生 ， 


MFC 添加 
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类 向 导 可 以 轻松 完成 CMessage 类 的 定义 。 
8. 添加 事件 函数 和 成 员 函 数 业务 逻辑 代码 


在 Message. cpp 中 完善 CMessage 的 成 员 函 数 代 码 ,在 ClientDlg. cpp 中 完善 CClientDlg 的 
事件 处 理 函 数 和 成 员 函 数 代码 ,在 ClientSocket. cpp 文件 中 完善 CClientSocket 的 事件 处 理 
函数 代码 ,详情 参见 程序 3. 4。 


3.3.5 ”聊天 室 客户 机 代码 分 析 


程序 3.4 聊天 室 客户 机 完整 代码 
(D Message. h 文件 清单 : 


//CMessage 定义 
# pragma once 


class CMessage : public CObject 
{ 
public: 
CMessage() ; 
virtual —CMessage() ; 
CString m strMessage; 
BOOL m bClosed; 
virtual void Serialize(CArchive& ar); 


}; 
(2) Message. cpp 文件 清单 : 
//Message.cpp: 实现 文件 


# include "stdafx. h" 
# include "Client. h" 
# include "Message. h" 


CMessage: :CMessage( ) 

{ 
m strMessage = T(""); 
m bClosed = FALSE; 

) 


CMessage: : —CMessage() 
ü 


//CMessage 成 员 函 数 
void CMessage: :Serialize(CArchive& ar) 
{ 
if (ar. IsStoring()) 
{ // 发 送 数据 
ar««(WORD)m bClosed; 
ar««m strMessage; 
) 


else 
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WORD wd; 

ar»» wd; 

m bClosed = (BOOL)wd; 
ar»»m strMessage; 


) 
(3) ClientSocket. h 文件 清单 : 


//CClientSocket 定义 


# pragma once 
class CClientDlg; 
class CClientSocket : public CSocket 
t 
public: 
CClientSocket(CClientDlg * pDlg); 
virtual —CClientSocket(); 
// 下 面 两 行 由 类 向 导 生 成 
CClientDlg * m pDlg; 
virtual void OnReceive( int nErrorCode); 
); 


(4) ClientSocket. cpp 文件 清单 : 


//ClientSocket.cpp: 实现 文件 


# include "stdafx. h" 

# include "Client. h" 

# include "ClientSocket. h" 
# include "ClientDlg. h" 


CClientSocket::CClientSocket(CClientDlg * pDlg) 


{ 
m_pDlg = pDlg; 
} 
CClientSocket: :一 CClientSocket() 
{ 
m pDlg- NULL; 
) 


//CClientSocket 成 员 函 数 


// 接 收 数据 


// 对 话 框 类 声明 ,手动 添加 


// 为 构造 函数 添加 入 口 参数 ,手动 添加 


// 成 员 变量 


// 手 动 添加 的 包含 语句 


// 事 件 处 理 函 数 , 当 客户 端 套 接 字 收 到 FD. READ 消息 时 执行 此 函数 


void CClientSocket: :OnReceive(int nErrorCode) 


f 
//TODO: 在 此 添加 专用 代码 或 调用 基 类 
CSocket: :OnReceive(nErrorCode); 
// 调 用 CClientDlg 类 的 相应 函数 处 理 


if (nErrorCode == 0) m pDlg 一 > onReceive( ); 


k 
(5) ClientDlg. h 文件 清单 : 
//ClientD1g.h : 头 文件 
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# pragma once 
# include "ClientSocket. h" // 手 动 添加 包含 语句 
//CClientDlg 对 话 框 
class CClientDlg : public CDialogEx 
{ 
public: 

CClientDlg(CHnd* pParent = NULL); // 标 准 构造 函数 
// 对 话 框 数据 

enum ( IDD = IDD CLIENT DIALOG ]; 

protected: 


virtual void DoDataExchange(CDataExchange * pDX);//DDX/DDV 支持 


protected: 
HICON m hIcon; 
// 生 成 的 消息 映射 函数 
virtual BOOL OnInitDialog(); 
afx msg void OnSysCommand(UINT nID, LPARAM lParam); 
afx msg void OnPaint(); 
afx msg HCURSOR OnQueryDragIcon( ) ; 
DECLARE MESSAGE MAP() 
public: 
// 以 下 代码 通过 类 向 导 添加 
CString m strServerName; 
int m nServerPort; 
CString m strSpeaking; 
CString m strUserName; 
CListBox m listCRoom; 
afx msg void OnClickedButtonLogin(); 
afx msg void OnClickedButtonLogout(); 
afx msg void OnClickedButtonSpeak(); 
afx msg void OnDestroy(); 
CClientSocket * m pSocket; 
CSocketFile * m pFile; 
CArchive * m pArchiveIn; 
CArchive * m pArchiveOut; 
void onReceive( void); 
void ReceiveMessage(void); 
void SendMyMessage(CString& strMessage, BOOL bClosed); 
); 


(6) ClientDlg. cpp 文件 清单 : 
//ClientDlg.cpp: 实现 文件 


# include "stdafx. h" 

£ include "Client. h" 

# include "ClientDlg. h" 

# include "afxdialogex. h" 

# include "ClientSocket. h" // 手 动 添加 包含 语句 


# include "Message. h" 


// 用 于 应 用 程序 “关于 ”菜单 项 的 CAboutDlg 对 话 框 
class ChboutD1g : public CDialogEx 


{ 
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public: 
ChboutDlg(); 
// 对 话 框 数据 
enum ( IDD = IDD ABOUTBOX }; 
protected: 
virtual void DoDataExchange(CDataExchange * pDX); 
protected: 
DECLARE MESSAGE MAP() 
h 


CAboutDlg::CAboutDlg() : CDialogEx(CAboutDlg: : IDD) 
ü 


void CAboutDlg: :DoDataExchange(CDataExchange * pDX) 
t 

CDialogEx: :DoDataExchange( pDX) ; 
) 


BEGIN MESSAGE MAP(CAboutDlg, CDialogEx) 
END MESSAGE MAP() 


//CClientDlg 对 话 框 
CClientDlg::CClientDlg(CHnd * pParent / * = NULL * /) 
: CDialogEx(CClientDlg::IDD, pParent) 
{ 
m hlcon = AfxGetApp() 一 > LoadIcon(IDR MAINFRAME); 
// 类 向 导 自 动 添加 的 初始 化 代码 
m strServerName = T(""); 
m nServerPort - 0; 
m strSpeaking - T(""); 
m strUserName = T(""); 
// 手 动 添加 的 初始 化 代码 
m pSocket = NULL; 
m pFile = NULL; 
m pArchiveIn - NULL; 
m pArchiveOut = NULL; 


) 


void CClientDlg::DoDataExchange(CDataExchange * pDX) 
{ 
CDialogEx: :DoDataExchange( pDX) ; 


DDX Text(pDX, IDC EDIT SERVERNAME, m strServerName); 


DDX Text(pDX, IDC EDIT SERVERPORT, m nServerPort); 
DDV MinMaxInt(pDX, m nServerPort, 1024, 49151); 
DDX Text(pDX, IDC EDIT SPEAKING, m strSpeaking); 
DDX Text(pDX, IDC EDIT USERNAME, m strUserName); 
DDX Control(pDX, IDC LIST CROOM, m listCRoom); 


BEGIN MESSAGE MAP(CClientDlg, CDialogEx) 
ON WM SYSCOMMAND() 
ON WM PAINT() 
ON WM QUERYDRAGICON( ) 


//DDX/DDV 支持 


ON BN CLICKED(IDC BUTTON LOGIN, &CClientDlg::OnClickedButtonLogin) 
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ON_BN_CLICKED( IDC_BUTTON_LOGOUT, &CClientDlg: :OnClickedButtonLogout) 
ON BN CLICKED(IDC BUTTON SPEAK, &CClientDlg: :OnClickedButtonSpeak) 
ON WM DESTROY() 


END MESSAGE MAP() 


//CClientDlg 消息 处 理 程序 
BOOL CClientDlg: :OnInitDialog() 


t 


) 


CDialogEx::OnInitDialog(); 

// 将 “关于 ”菜单 项 添加 到 系统 菜单 中 
//IDM_ABOUTBOX 必须 在 系统 命令 范围 内 

ASSERT( (IDM_ABOUTBOX & 0xFFF0) == IDM ABOUTBOX); 
ASSERT(IDM ABOUTBOX < OxF000) ; 


CMenu* pSysMenu - GetSystemMenu(FALSE) ; 
if (pSysMenu != NULL) 
t 
BOOL bNameValid; 
CString strAboutMenu; 
bNameValid = strAboutMenu. LoadString(IDS ABOUTBOX); 
ASSERT(bNaneValid); 
if (!strAboutMenu. IsEnpty()) 
{ 
pSysMenu - > AppendMenu( MF_SEPARATOR) ; 
pSysMenu 一 > AppendMenu(MF STRING, IDM ABOUTBOX, strAboutMenu); 
) 
) 
// 设 置 此 对 话 框 的 图 标 。 当 应 用 程序 主 窗口 不 是 对 话 框 时 ,框架 将 自动 执行 此 操作 


SetIcon(m hlcon, TRUE); // 设 置 大 图 标 
SetIcon(m_hIcon, FALSE); // 设 置 小 图 标 
//TODO: 在 此 添加 额外 的 初始 化 代码 

// 手 动 添加 以 下 初始 化 代码 


m_strUserName =_T(" 智 慧 树 "); 

m strServerName = T("localhost"); 

m_nServerPort = 10000; 

UpdateData(FALSE) ; // 更 新 对 应 控件 数据 
GetDlgItem(IDC EDIT SPEAKING) -> EnableWindow(FALSE); 

GetDlgItem(IDC BUTTON LOGOUT) — > EnableWindow(FALSE) ; 

GetDlgItem(IDC BUTTON SPEAK) - > EnableWindow( FALSE) ; 

return TRUE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE. 


void CClientD1g: :OnSysCommand(UINT nID, LPARAM lParam) 


{ 


if ((nID & OxFFFO) == IDM ABOUTBOX) 
{ 
CAboutDlg dlgAbout; 
dlgAbout. DoModal(); 
) 
else 
t 
CDialogEx::OnSysCommand(nID, lParam); 
) 
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// 如 果 向 对 话 框 添加 最 小 化 按钮 , 则 需要 下 面 的 代码 

// 来 绘制 该 图 标 。 对 于 使 用 文档 /视图 模型 的 MFC 应 用 程序 ， 
// 这 将 由 框架 自动 完成 

void CClientDlg: :OnPaint() 


t 


) 


if (IsIconic()) 
t 
CPaintDC dc(this); // 用 于 绘制 的 设备 上 下 文 
SendMessage(WM ICONERASEBKGND, reinterpret_cast <WPARAM>(dc. GetSafeHdc()), 0); 


// 使 图 标 在 工作 区 矩形 中 居中 

int cxIcon = GetSystemMetrics(SM CXICON); 
int cyIcon = GetSystemMetrics(SM CYICON); 
CRect rect; 

GetClientRect(&rect); 

intx = (rect.Width() - cxIcon + 1)/2; 
int y 7 (rect.Height() - cyIcon * 1)/2; 


// 绘 制图 标 
dc.DrawIcon(x, y, m_hIcon); 
) 
else 
{ 
CDialogEx: :OnPaint(); 
) 


// 当 用 户 拖 动 最 小 化 窗口 时 ,系统 调用 此 函数 取得 光标 显示 
HCURSOR CClientD1g: :OnQueryDragIcon() 


{ 


) 


return static cast < HCURSOR»(m hlIcon); 


// 以 下 所 有 函数 的 框架 由 类 向 导 生 成 ,其 实现 代码 需要 手动 添加 
void CClientDlg: :OnClickedButtonLogin() 


{ 


//TOD0: 在 此 添加 控件 通知 处 理 程序 代码 
m pSocket = new CClientSocket(this);// 创 建 套 接 字 
if (!m pSocket -> Create()) 
{ 
// 错 误 处 理 
delete m pSocket; 
m pSocket = NULL; 
AfxMessageBox(_T(" 创 建 连接 服务 器 的 套 接 字 错误 , 登录 失败 !")); 
return; 
} 
if (!m pSocket -> Connect(m strServerName,m nServerPort)) 
t 
// 错 误 处 理 
delete m pSocket; 
m pSocket = NULL; 
AfxMessageBox(_T(" 连 接 服务 器 错误 ,登录 失败 !")); 
return; 
} 
m pFile= new CSocketFile(m pSocket); 


) 
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m pArchiveIn = new CArchive(m pFile,CArchive: :load) ; 
m_pArchive0ut = new CArchive(m pFile, CArchive: :store); 
// 向 服务 器 发 送 消息 ,表明 新 客户 进入 聊天 室 
UpdateData(TRUE) ; // 更 新 控件 成 员 变 量 
CString strTemp; 

strTemp- m strÜserName ^ T(": 昂首 挺 胸 进入 聊天 室 ! 
SendMyMessage( strTemp, FALSE) ; 


^) 


GetDlgItem(IDC EDIT SPEAKING) 一 > EnableWindow( TRUE); 
GetDlgltem(IDC BUTTON LOGOUT) 一 > EnableWindow(TRUE); 
GetDlgItem(IDC BUTTON SPEAK) -> EnableWindow( TRUE); 


GetDlgItem(IDC EDIT USERNAME) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC EDIT SERVERNAME) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC EDIT SERVERPORT) 一 > EnableWindow(FALSE); 
GetDlgItem(IDC BUTTON LOGIN) -> EnableWindow(FALSE); 


// 单 击 “ 退 出 ”按钮 的 响应 函数 
void CClientDlg: :OnClickedButtonLogout() 


( 


) 


//10D0: 在 此 添加 控件 通知 处 理 程序 代码 
CString strTemp; 
strTemp- m strUserName t T(": 大 步 流星 离开 聊天 室 .…… "); 
SendMyMessage( strTemp, TRUE) ; 
// 删 除 对 象 ,释放 空间 

delete m pArchiveIn; 

delete m pArchiveOut; 

delete m pFile; 

delete m pSocket; 

m pArchiveIn - NULL; 

m pArchiveOut = NULL; 

m pFile- NULL; 

m pSocket = NULL; 


// 清 除 聊 天 室内 容 
while (m listCRoom. GetCount()!= 0) 

m listCRoon. DeleteString(0); 
GetDlgItem(IDC EDIT SPEAKING) -> EnableWindow(FALSE); 
GetDlgItem(IDC BUTTON LOGOUT) — > EnableWindow(FALSE) ; 
GetDlgItem(IDC BUTTON SPEAK) — > EnableWindow(FALSE); 


GetDlgItem(IDC EDIT USERNAME) - > EnableWindow( TRUE) ; 
GetDlglItem(IDC EDIT SERVERNAME) 一 > EnableWindow( TRUE) ; 
GetDlgItem(IDC EDIT SERVERPORT) — > EnableWindow( TRUE) ; 
GetDlgItem(IDC BUTTON LOGIN) — EnableWindow(TRUE) ; 


// 单 击 “ 发 言 "按钮 的 响应 函数 
void CClientDlg: :OnClickedButtonSpeak() 


{ 


//Topo: 在 此 添加 控件 通知 处 理 程序 代码 
UpdateData(TRUE) ; // 更 新 控件 成 员 变 量 , 取 回 用 户 输入 的 数据 
if (!m strSpeaking. IsEmpty( )) // 发 言 输入 框 不 为 空 
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t 
SendMyMessage(m strUserName + "大 声 说 : " + m strSpeaking, FALSE); 
m strSpeaking- T(""); 
UpdateData(FALSE) ; // 更 新 用 户 界 面 , 将 发 言 框 清空 
) 
) 
// 关 闭 客户 机 时 的 善后 处 理 函 数 
void CClientD1g: :OnDestroy() 


{ 
CDialogEx: :OnDestroy( ); 
//'T0DO: 在 此 处 添加 消息 处 理 程序 代码 
if ((m pSocket!- NULL) && (m pFile!- NULL) && (m pArchiveOut!- NULL)) 
t 
CMessage msg; 
CString strTemp; 
strTemp- _T(" 广 而 告 之 : ") +m_strUserName+ T(" 所 在 客户 机 已 关闭 "); 
msg.m strMessage = strTemp; 
msg.m bClosed - TRUE; 
msg.Serialize( * m pArchiveOut); 
m pArchiveOut -> Flush(); 


// 删 除 对 象 , 释放 空间 
delete m pArchiveIn; 
delete m pArchiveOut; 
delete m pFile; 

m pArchiveIn = NULL; 
m pArchiveOut - NULL; 
m pFile- NULL; 


if (m pSocket!- NULL) 
{ 
BYTE buffer[100]; 
m pSocket 一 > ShutDown() ; 
while (m pSocket -> Receive(buffer, 100)» 0); 
) 
delete m pSocket; 
m pSocket = NULL; 


) 


// 当 套 接 字 收 到 FD. READ 消息 时 , 它 的 OnReceive 函数 调用 此 函数 
void CClientD1g: :onReceive(void) 
t 
do ( 
ReceiveMessage(); // 接 收 消息 
if (m pSocket == NULL) return; 
)while(!m pArchiveIn- 一 > IsBufferEmpty()); 


) 


// 接 收 消息 处 理 函 数 
void CClientDlg: :ReceiveMessage(void) 
{ 

CMessage msg; 
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try{ 

msg.Serialize( * m pArchiveIn); // 接 收 

m listCRoom. AddString(msg.m strMessage); // 显 示 在 聊天 室 大 厅 
)catch(CFileException e) { 

// 错 误 处 理 


CString strTemp; 

strTemp- _T(" 与 服务 器 连接 已 断 开 ,连接 关闭 !"); 
m listCRoom. AddString( strTemp); 
msg.m bClosed = TRUE; 

m pArchiveOut -> Abort(); 

// 删 除 对 象 ,释放 空间 

delete m pArchiveIn; 

delete m pArchiveOut; 

delete m pFile; 

delete m pSocket; 

m pArchiveIn - NULL; 

m pArchiveOut = NULL; 

m pFile- NULL; 

m pSocket - NULL; 


) 


// 发 送 消息 的 处 理 函数 
void CClientD1g: :SendMyMessage(CString& strMessage, BOOL bClosed) 
t 
if (m pArchiveOut!- NULL) ( 

CMessage msg; 

msg.m strMessage - strMessage; 

msg.m bClosed - bClosed; 

msg.Serialize( * m pArchiveOut); 

m pArchiveOut -> Flush(); 


) 
编译 测试 ,客户 机 运行 初始 界面 如 图 3.44 所 示 。 


虑 网 络 聊 天 室 客户 机 


EPRA: | TSP | 服务 器 名 :| cahost | an: [10000 
zew: | 
BIEEXI: 


图 3. 44 聊天 室 客户 机 运行 初始 界面 
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3.3.6 聊天 室 客户 机 与 服务 器 联合 测试 


聊天 室 客 户 机 与 服务 器 联合 测试 效果 如 图 3. 45 所 示 ,其 测试 步骤 如 下 : 

CD 启动 服务 器 ,其 初始 运行 界面 如 图 3. 41 所 示 。 

(2) 启动 客户 机 ,其 初始 运行 界面 如 图 3. 44 所 示 。 

(3) 再 启动 一 个 客户 机 程序 ,将 客户 昵称 改 为 "大 风车 ”, 以 区 别 前 一 客户 机 “智慧 树 ”。 

(4) 单 击 服务 器 界面 上 的 “启动 服务 器 "按钮 ,服务 器 开始 工作 ,服务 器 上 的 列表 框 相当 
于 聊天 室 大 厅 ,会 反映 客户 机 的 活动 情况 。 

(5) 分 别 单 击 “ 智 慧 树 " 客 户 机 和 “大 风车 "客户 机 上 的 “登录 "按钮 ,用 户 可 以 看 到 客户 
机 聊天 窗口 中 的 信息 提示 ,这 个 信息 也 会 反映 到 服务 器 上 。 

(6) 接 下 来 ,客户 机 群 可 以 “七 嘴 八 舌 ”, 各 抒 已 见 。 


t 网 络 聊天 室 客户 机 


ET 
| 马克思 说 : 人 们 为 之 奋斗 的 一 切 ,都 同 地 们 的 利益 有 关 。 | 


"wur: RENS SU 
大 风车 : 昂首 托 胸 进入 则 天 室 1 


| 
RAN: TE: 天 于 只 于 又 ， 小 人 只 于 利 。 


聊天 室 大 厅 : 
大 风车 : SERENO BERE 


A 网 络 聊天 室 服务 器 


监听 骤 务 器 庄 口 号 : 


聊天 室 服 务 器 大 厅 : 


up: RETENIR 
大 风车 : REREAD 


图 3.45 网 络 聊天 室 联 合 测试 界面 


如 果 读 者 以 极 大 的 耐心 和 细致 完成 了 程序 3. 3 和 程序 3. 4 的 联合 测试 ,相信 此 时 心头 
会 涌 出 一 种 "会 当 凌 绝顶 ,一 览 众 山 小 ”的 豪迈 之 感 。 


ELE 


. 什么 是 MFC 编程 ? 简 述 MFC 编程 的 基本 框架 。 

. 简 述 MFC 套 接 字 编程 与 WinSock API 编程 的 不 同 。 

- 为 什么 说 MFC 套 接 字 类 是 对 WinSock API 的 封装 ? 

. MFC 提供 的 两 个 套 接 字 类 CAsyncSocket 和 CSocket 有 何不 同 ? 
。 简 述 客户 机 使 用 CAsyncSocket 类 的 编程 步骤 。 


Cog 0 r o — 
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. 简 述 服务 器 使 用 CAsyncSocket 类 的 编程 步骤 。 
. 简 述 客户 机 使 用 CSocket 类 的 编程 步骤 。 
. 简 述 服务 器 使 用 CSocket 类 的 编程 步骤 。 
. 聊天 室 程序 的 服务 器 端 是 如 何 处 理 多 客户 连接 的 ? 是 否 有 更 好 的 办 法 ? 
10. 根据 QQ 软件 的 特点 ,改善 网 络 聊天 程序 的 设计 。 
11. 将 程序 3. 1 与 程序 2. 9 进行 比较 ,将 程序 3. 2 与 程序 2. 10 进行 比较 , 写 出 对 比分 
析 结 果 。 
12. 将 程序 3. 3 与 程序 2. 11 进行 比较 , 写 出 对 比分 析 结 果 。 
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Windows Internet 编 程 


WinInet(Windows Internet) API 是 微软 公司 提供 的 面向 互联 网 应 用 (主要 是 FTP 应 
HA HTTP 应 用 ) 的 编程 接口 ,是 微软 庞大 的 网 络 编程 框架 中 的 一 个 分 支 。 那 么 关于 FTP 
和 HTTP 之 类 的 应 用 ,可 否 用 前 面 的 WinSock API 或 MFC 套 接 字 来 解决 呢 ? 可 以 ,但 会 相 
当 麻 烦 , 因 为 程序 员 要 用 套 接 字 技术 实现 FTP 和 HTTP 协议 的 若干 细节 ,而 现在 这 些 复杂 的 
细节 都 被 WinInet API 进行 了 抽象 和 封装 ,大 幅 降低 了 Windows Internent 网 络 编程 的 复杂 性 。 


G. 1 Winlnet API 编程 
- 


WinInet API 不 支持 服务 器 编程 ,服务 器 编程 可 以 使 用 微软 提供 的 另 一 网 络 编程 杠 
3 — Windows HTTP APICWinHTTP API), WinInet API 编程 面向 C/C++ 程序 员 , 需 
要 对 FTP fit HTTP 协议 有 一 个 基本 的 了 解 。 借 助 于 WinInet API, 编 程 者 不 必 了 解 底层 
WinSock, TCP/IP 和 特定 Internet 协议 的 细节 就 可 以 编写 出 高 水 平 的 Internet. 客户 端 程 
序 , 如 FTP 客户 机 或 浏览 器 等 。 


4.1.1 Winlnet HINTERNET 句柄 


WinInet API 函数 定位 网 络 资源 时 会 返回 一 个 特有 的 句柄 类 型 一 -HINTERNET， 
WinInet 函数 创建 ,使 用 的 句柄 都 是 HINTERNET 类 型 的 ,HINTERNET 句柄 与 其 他 文件 
操作 类 句柄 不 同 ,不 能 互 换 使 用 。 例 如 ,用 CreateFile 函数 返回 的 句柄 不 能 传递 给 
InternetReadFile 函数 使 用 。 梳 理 WinInet API 函数 创建 和 使 用 HINTERNET 句柄 的 次 
序 , 有 助 于 用 户 理解 WinInet API 函数 编程 脉络 。 


1. HINTERNET 句柄 层次 


WinInet API 函数 创建 和 使 用 HINTERNET 句柄 的 层次 关系 如 图 4. 1 所 示 。InternetOpen 
返回 的 句柄 是 根 句 柄 。InternetConnect 函数 返回 的 是 二 级 句柄 , FtpOpenFile, 
FtpFindFirstFile, HttpOpenRequest 返回 的 是 叶子 句柄 。 对 于 Windows XP, Windows 
Server 2003 R2 及 更 早 版 本 的 Windows 而 言 ,GopherOpenFile 和 GopherFindFirstFile 返 
回 的 也 是 叶子 句柄 。 考 虑 到 Gopher 协议 已 经 “淡出 "应用. 下面 的 讨论 将 不 再 关注 Gopher 
的 有 关内 容 。 总 之 ,图 4.1 中 所 示 的 每 一 个 WinInet API 函数 都 会 返回 一 个 HINTERNET 
句柄 以 定位 资源 。 
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InternetOpen 


InternetOpenUrl —Ó H 
FtpOpenFile 
FtpFindFirstFile 
HttpOpenRequest 
GopherOpenFile 
GopherFindFirstFile 


图 4.1 WinInet API fj HINTERNET 句柄 层次 关系 


InternetOpenUrl 函数 返回 HINTERNET 句柄 ,可 以 被 图 4. 2 中 所 示 的 关联 函数 使 
用 ,图 中 深 色 背 景 框 里 的 函数 都 能 返回 HINTERNET 句柄 ,空白 框 里 的 函数 则 只 能 使 用 关 
联 函 数 返回 的 HINTERNET 句柄 ,自身 不 能 创建 句柄 。 

InternetQueryDataA vailable, InternetReadFile 和 InternetSetFilePointer 函数 使 用 
InternetOpenUrl 函数 创建 的 HINTERNET 句柄 . 


2. FTP 句柄 层次 


图 4.3 展示 了 需要 使 用 InternetConnect 函数 创建 的 HINTERNET 句柄 的 FTP PR 
数 , 图 中 深 色 背 景 框 的 两 个 函数 都 能 创建 句柄 ,空白 框 里 的 函数 不 能 创建 HINTERNET 


句柄 。 
Intern n 
InternetConnect 


FtpCreateDirectory 


FtpDeleteFile r1 
FtpGetCurrentDirectory 
FtpGetFile 
FtpPutFile [7] 
InternetQueryDataA vailable FtpRemoveDirectory 
InternetReadFile FtpRenameFile 
InternetSetFilePointer FtpSetCurrentDirectory 
4.2 InternetOpenUrl 关联 的 函数 4.3 FTP 协议 函数 的 句柄 层次 之 一 


FtpCreateDirectory、 FtpDeleteFile, FtpGetCurrentDirectory, FtpGetFile, FtpPutFile, 
FtpRemoveDirectory , FtpRenameFile 和 FtpSetCurrentDirectory 函数 使 用 InternetConnect 
函数 创建 的 HINTERNET 句柄 。 

能 够 返回 HINTERNET 句柄 的 两 个 FTP 函数 如 图 4.4 所 示 。 在 该 图 中 ,返回 句柄 函 
数 已 被 加 了 深 色 背景 框 ,空白 框 里 的 函数 使 用 其 关联 函数 创建 的 句柄 。 

InternetFindNextFile 函数 依赖 FtpFindFirstFile 函数 创建 的 句柄 ,InternetReadFile 和 
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InternetWriteFile 依赖 FtpOpenFile 创建 的 句柄 。 
3. HTTP 句柄 层次 


HTTP 函数 的 HINTERNET 句柄 层次 关系 如 图 4. 5 所 示 , 深 色 背 景 框 里 的 函数 表示 
能 够 创建 HINTERNET 句柄 ,空白 框 里 的 函数 只 能 使 用 与 它 关联 的 函数 创建 的 句柄 。 


InternetOpen 
InternetOpen InternetConnect. 


InternetConnect. inoit 
HttpAddRequestHeaders 

FipOpenFile FipFindFirstFile l HupQuerylnfo 

InternetQueryDataAvailable InternetFindNextFile HttpSendRequest 


H InternetReadFile HttpSendRequestEx 


Internet WriteFile 


InternetErrorD]; 


图 4.4 FTP 协 议 函 数 的 句柄 层次 之 二 图 4.5 HTTP 协议 函数 句柄 层次 之 一 


HttpAddRequestHeaders、HttpQueryInfo、HttpSendRequest、HttpSendRequestEx、 
InternetErrorDlg 函数 依赖 HttpOpenRequest 函数 返回 的 句柄 。 

HttpOpenRequest 函数 创建 的 HINTERNET 请 求 句 柄 ,经 HttpSendRequest 请 求 函 数 成 
功 处 理 后 , 才 可 以 被 InternetQueryDataA vailable, InternetReadFile 和 InternetSetFilePointer PK 
数 所 使 用 ,如 图 4.6 所 示 。 

图 4.7 展示 了 另 一 组 层次 关系 , HttpSendRequestEx 函数 返回 的 句柄 可 以 被 
HttpEndRequest InternetReadFileEx, Internet WriteFile 函数 所 使 用 ;HttpEndRequest 函数 返回 
的 句柄 可 以 被 InternetReadFile InternetSetFilePointer, InternetQueryDataA vailable 函数 
所 使 用 。 


InternetOpen 
InternetConnect 
HttpOpenRequest 
InternetOpen 
HttpSendRequestEx 
InternetConnect. 
HttpEndRequest 
ropen InternetReadFileEx 


HttpSendRequest 
InternetQueryDataAvailable InternetReadFile 


InternetReadFile InternetSetFilePointer 
InternetSetFilePointer InternetQueryDataAvailable 


4.6 HTTP 协议 函数 句柄 层次 之 二 图 4.7 HTTP 协 议 函 数 句柄 层次 之 三 


InternetWriteFile 
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编程 者 根据 图 A. 1 一 图 4. 7 给 出 的 HINTERNET 句柄 层次 关系 ,可 以 大 致 理 清 
WinInet API 函数 之 间 的 联系 。 


4.1.2 Winlnet 通用 API 


尽管 FTP 和 HTTP 协议 访问 Internet 的 方法 不 同 , 但 有 几 个 函数 两 者 是 通用 的 , 归 类 
如 下 。 

(1) Internet 资源 下 载 : InternetReadFile, InternetSetFilePointer, InternetFindNextFile., 
InternetQueryDataA vailable PR, 

(2) 设置 异步 操作 : InternetSetStatusCallback 函数 。 

(3) 查询 更 改选 项 : InternetSetOption 和 InternetQueryOption PRA. 

(4) 关闭 HINTERNET 句柄 : InternetCloseHandle K% 

(5) 锁定 和 解锁 资源 文件 : InternetLockRequestFile 和 InternetUnlockRequestFile 
函数 。 

表 4.1 列 出 了 上 述 函 数 的 简单 功能 描述 ,这 些 函 数 都 是 在 FTP 和 HTTP 编程 中 需要 
用 到 的 ,能 处 理 不 同类 型 的 HINTERNET 句柄 。 


表 4.1 WinInet API 通 用 函数 


Ed 数 功 能 

a 继续 文件 的 枚 举 或 搜索 ,需要 依赖 FtpFindFirstFile、InternetOpenUrl 函数 
创建 的 句柄 

二 允许 用 户 锁定 文件 ,需要 依赖 FtpOpenFile, HttpOpenRequest InternetOpenUrl 
函数 创建 的 句柄 

查询 可 供 下 载 的 数据 量 ,需要 依赖 FtpOpenFile、HttpOpenRequest 函数 创 

InternetQueryDataA vailable 
SER AR 

InternetQueryOption 查询 Internet 设置 

InternetReadFile 读 取 URL 数据 ,需要 依赖 InternetOpenUrl, FtpOpenFile, HttpOpenRequest 
函数 创建 的 句 栖 

Baisse eMe 设置 文件 指针 ,需要 依赖 InternetOpenUrl JH. HTTP URL) , HttpOpenRequest 
(用 GET 方法 ) 函 数 创建 的 句柄 

InternetSetOption 配置 Internet 设置 

TaternetSetStatusCallback 设置 一 个 接收 状态 信息 的 回调 函数 , 分 配 一 个 回调 函数 给 指定 的 
HINTERNET 句柄 

InternetUnlockRequestFile | 解锁 被 InternetLockRequestFile 锁定 的 文件 


上 述 函 数 的 使 用 大 致 可 以 归 为 两 类 ,一 类 用 来 从 Internet 读 取 文件 ,一 类 用 来 查找 和 定 
位 文件 。 


1. 读 取 文 件 


InternetReadFile 函数 用 于 从 Internet 下 载 HINTERNET 句柄 定位 的 资源 文件 ， 
HINTERNET 句柄 需要 先 用 InternetOpenUrl, FtpOpenFile 或 HttpOpenRequest 创建 返 
回 。 该 函数 的 语法 如 下 : 
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BOOL InternetReadFile( 

_In_ HINTERNET hFile, 

.Out LPVOID lpBuffer, 

_In DWORD dwNumberOfBytesToRead, 
Out_ LPDWORD lpdwNumberOfBytesRead 


); 

第 1 个 参数 是 调用 InternetOpenUrl , FtpOpenFile 或 HttpOpenRequest 返回 的 句柄 。 

第 2 个 参数 是 指针 类 型 ,指向 接收 数据 的 缓冲 区 。 

第 3 个 参数 指定 要 读 取 的 字 节 数 。 

第 4 个 参数 是 指针 类 型 ,指向 实际 读 取 的 字 节 数 。 

WinInet 使 用 InternetQueryDataAvailable 和 InternetReadFile 完成 资源 下 载 。 
InternetOpenUrl, FtpOpenFile 函数 创建 的 HINTERNET 句柄 ,或 HttpOpenRequest 函数 创建 
的 HINTERNET 句柄 经 HttpSendRequest 函数 返回 后 ,传递 给 InternetQueryDataAvailable PR 
数 作为 参数 可 以 返回 目标 资源 的 大 小 ( 字 节 数 ) 。 

下 面 给 出 的 程序 4. 1 实现 了 目标 资源 的 下 载 与 显示 ,目标 资源 用 hResource 句柄 定位 ， 
下 载 结果 显示 在 intCtrlID 文本 框 中 。Dumper 是 一 个 通用 例 程 , 编 程 者 几乎 不 用 对 其 进行 
修改 即 可 将 其 用 到 自己 的 程序 里 。 

程序 4.1 Internet 数据 下 载 通用 例 程 1 


int WINAPI Dumper(HWND hX, int intCtrlID, HINTERNET hResource) 
{ 


LPTSTR — lpszData; // 数 据 缓冲 区 

DWORD dwSize; // 缓 冲 区 大 小 

DWORD dwDownloaded; // 下 载 的 长 度 

DWORD dwSizeSum = 0; // 在 文本 框 中 的 数据 大 小 
LPTSTR ~ lpszHolding; // 暂 存 数据 缓冲 区 

// 将 光标 换 成 等 待 形状 (沙漏 ) 


SetCursor(LoadCursor(NULL, IDC WAIT)); 
// 这 个 循环 用 于 读 取 数据 
do 


{ 
// 调 用 InternetQueryDataAvailable 确定 可 供 下 载 的 数据 量 
if (! InternetQueryDataAvailable(hResource, &dwSize, 0,0) ) 
t 
ErrorOut(hX, GetLastError(), TEXT(" InternetReadFile")); 
SetCursor(LoadCursor(NULL, IDC ARRON)); 
return FALSE; 
} 
else 
{ 
// 定 义 数 据 缓冲 区 
lpszData = new TCHAR[dwSize + 1]; 


// 从 HINTERNET 句柄 读 取 数据 

if(!InternetReadFile(hResource, (LPVOID) 1pszData, 
dwSize, &dwDownloaded)) 

t 


) 


else 


{ 
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ErrorOut(hX, GetLastError(), TEXT(" InternetReadFile")); 
delete[] lpszData; 
break; 


// 添 加 一 个 NULL 到 数据 缓冲 区 的 末尾 
lpszData[dwDownloaded] = ^ 0'; 


// 分 配 暂 存 缓冲 区 
lpszHolding = new TCHAR[dwSizeSum + dwDownloaded + 1]; 


// 检 查 是 否 有 数据 写 人 文本 框 中 
if (dwSizeSum != 0) 
{ 
// 返 回 存储 在 文本 框 中 的 数据 
GetD1gItemText(hX, intCtrlID, 
(LPTSTR) lpszHolding, 
dwSizeSum); 


// 在 文本 框 中 数据 的 最 后 添加 一 个 NULL 
lpszHolding[dwSizeSum] = '\0'; 

) 

else 

{ 
// 使 暂 存 缓冲 区 保持 一 个 空 字符 串 
lpszHolding[0] = ^0'; 

) 


size t cchDest = dwSizeSum + dwDownloaded + 
dwDownloaded * 1; 

LPTSTR pszDestEnd; 

size t cchRemaining; 


// 添 加 新 的 数据 到 暂 存 缓冲 区 
HRESULT hr = StringCchCatEx(lpszHolding, cchDest, 
lpszData, &pszDestEnd, 
&cchRemaining, 
STRSAFE NO TRUNCATION); 
if(SUCCEEDED( hr) ) 
( 
// 写 暂 存 缓冲 区 的 数据 到 文本 框 
SetD1gItemText(hX, intCtrlID, (LPTSTR) 1pszHolding); 


// 删 除 这 两 个 缓冲 区 
delete[] lpszHolding; 
delete[] lpszData; 


// 更 新 文本 框 数据 大 小 
dwSizeSum = dwSizeSum + dwDownloaded + 1; 


// 检 查 剩余 数据 的 大 小 ,如 果 是 零 ,停止 下 载 进程 
if (dwDownloaded == 0) 
{ 
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break; 
) 
else 
{ 
//ropo: 插 和 人 错误 处 理 代码 
) 


) 


) 
while(TRUE); 


//3& B] HINTERNET 句柄 
InternetCloseHandle(hResource); 


// 将 光标 换 成 箭头 形状 
SetCursor(LoadCursor ( NULL, IDC ARROW)); 


// 返 回 
return TRUE; 
) 


InternetReadFile 函数 读 取 所 有 可 用 数据 时 返回 零 值 ,应 用 程序 可 以 根据 InternetReadFile 
的 这 个 特点 构造 一 个 循环 来 反复 下 载 数 据 ,直到 所 有 数据 下 载 成 功 为 止 。 

程序 4. 2 仍然 是 一 个 从 Internet 读 取 数 据 并 且 显 示 在 intCtrlID 文本 框 中 的 通用 例 程 ， 
读者 可 以 将 程序 4. 2 与 程序 4. 1 对 照 学 习 , 看 有 哪些 不 同 。 

程序 4.2 Internet 数据 下 载 通用 例 程 2 


int WINAPI Dump(HWND hX, int intCtrlID, HINTERNET hResource) 
( 

DWORD dwSize - 0; 

LPTSTR lpszData; 

LPTSTR lpszOutPut; 

LPTSTR lpszHolding - TEXT(""); 

int nCounter - 1; 

int nBufferSize - 0; 

DWORD BigSize - 8000; 


// 将 光标 换 成 等 待 形状 
SetCursor(LoadCursor(NULL, IDC_WAIT)); 
// 开 始 循环 读 取 数据 
do 
{ 
// 分 配 缓冲 区 
lpszData = new TCHAR[BigSize + 1]; 
// 读 取 数 据 
if(!InternetReadFile(hResource, 
(LPVOID) lpszData, 
BigSize &dwSize)) 
{ 


ErrorOut(hX, GetLastError(), TEXT(" InternetReadFile")); 
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delete []lpszData; 
break; 
) 


else 

t 
// 添 加 一 个 NULL 到 缓冲 区 的 最 后 
lpszData[dwSize] = '\0'; 


// 检 查 是 否 所 有 的 数据 被 读 取 

if (dwSize == 0) 

t 
// 将 最 终 数据 写 到 文本 框 
SetDlgItemText(hX, intCtrlID, lpszHolding); 


// 删 除 现 有 的 缓冲 区 
delete [] 1pszData; 
delete [] 1pszHolding; 
break; 

) 


// 确 定 缓冲 区 的 大 小 能 够 放下 新 的 数据 
nBufferSize = (nCounter * BigSize) *1; 


// 增 加 缓冲 区 数目 


nCounter++ ; 


// 分 配 输出 缓冲 区 
lpszOutPut = new TCHAR[nBufferSize]; 


// 确 保 缓冲 区 不 是 初始 缓冲 区 

if(nBufferSize != int(BigSize+1)) 

{ 
// 在 暂 存 缓冲 区 中 复制 数据 
StringCchCopy( 1psz0utPut, nBufferSize, lpszHolding); 
//TO0D0: 添 加 错误 处 理 代码 


// 将 新 的 缓冲 区 与 输出 缓冲 区 连接 


StringCchCat(lpszOutPut, nBufferSize, lpszData); 
//T0D0: 添 加 错误 处 理 代码 


// 删 除 暂 存 缓冲 区 
delete [] lpszHolding; 


else 


// 复 制 数据 缓冲 区 
StringCchCopy(1pszOutPut, nBufferSize, lpszData); 
//ToD0: 添 加 错误 处 理 代码 


// 分 配 暂 存 缓冲 区 
lpszHolding = new TCHAR[nBufferSize]; 


// 复 制 输出 缓冲 区 到 暂 存 缓冲 区 
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memcpy( 1pszHo1ding, 1psz0utPut, nBufferSize); 


// 删 除 其 他 缓冲 区 
delete [] 1pszData; 
delete [] 1pszOutPut; 


$ 
while (TRUE); 


// 关 闭 HINTERNET 句柄 


InternetCloseHandle(hResource); 


// 将 光标 换 成 箭头 形状 
SetCursor(LoadCursor(NULL, IDC_ARROW) ) ; 


// 返 回 


return TRUE; 


2. 查找 文件 


查找 文件 的 方法 是 , 先 用 FtpFindFirstFile 或 InternetOpenUrl 函数 返回 Internet 资源 
的 HINTERNET 句柄 ,然后 将 这 个 句柄 作为 参数 传递 给 InternetFindNextFile 函数 返回 下 
一 个 文件 ,持续 调用 InternetFindNextFile 函数 直到 出 现 ERROR. NO MORE FILES 错误 
为 止 ,这 个 错误 说 明 遍 历 文件 目录 工作 结束 ,错误 信息 可 调用 GetLastError 函数 捕获 。 

程序 4.3 演示 了 如 何 获 取 FTP 文件 目录 并 显示 在 lstDirectory 列表 框 中 ,其 中 使 用 的 
hConnect 句柄 通过 InternetConnect 函数 建立 FTP 会 话 获 得 。 

程序 4.3 ”获取 FTP 文件 目录 并 显示 通用 例 程 

bool WINAPI DisplayDir( HWND hX, 

int lstDirectory, 


HINTERNET hConnect, 
DWORD dwFlag ) 


WIN32 FIND DATA pDirInfo; 
HINTERNET hDir; 
TCHAR DirList[MAX PATH]; 


// 将 光标 换 成 等 待 形状 
SetCursor(LoadCursor(NULL,IDC WAIT)); 


// 重 置 列表 框 
SendDlgItemMessage(hX, lstDirectory,LB RESETCONTENT, 0,0); 


// 查 找 第 一 个 文件 

hDir = FtpFindFirstFile (hConnect, TEXT (" x . « "), 
&pDirInfo, dwFlag, 0); 

if (!hDir) 

{ 


else 
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// 检 查 错误 是 否 是 因为 没有 文件 
if (GetLastError() == ERROR NO MORE FILES) 
{ 

// 提 醒 用 户 


MessageBox(hX, TEXT("There are no files here!!!"), 
TEXT("Display Dir"), MB OK); 


// 关 闭 HINTERNET 句柄 


InternetCloseHandle(hDir); 


// 将 光标 换 成 箭头 形状 
SetCursor(LoadCursor( NULL, IDC ARROW)); 


// 返 回 
return TRUE; 


else 


// 调 用 错误 处 理 程序 
ErrorOut (hX, GetLastError (), TEXT("FindFirst error: ")); 


// 关 闭 HINTERNET 句柄 
InternetCloseHandle(hDir); 


// 将 光标 换 成 箭头 形状 
SetCursor(LoadCursor(NULL, IDC_ARROW) ) ; 


// 返 回 
return FALSE; 


// 将 文件 名 写 和 一 个 字符 串 
StringCchPrintf(DirList, MAX PATH, pDirInfo.cFileName); 


// 检 查 文件 的 类 型 

if (pDirInfo.dwFileAttributes == FILE ATTRIBUTE DIRECTORY) 

t 
// 添 加 <DIR> 表 示 这 是 一 个 用 户 目录 
StringCchCat(DirList, MAX PATH, TEXT(" < DIR» ")); 
//ToD0: 添 加 错误 处 理 代码 

} 


// 添 加 文件 名 或 目录 到 列表 框 
SendDlgItemMessage(hX, lstDirectory, LB ADDSTRING, 
0, (LPARAM)DirList); 


// 查 找 下 一 个 文件 
if (!InternetFindNextFile (hDir, &pDirInfo)) 
t 
if ( GetLastError() == ERROR NO MORE FILES ) 
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else 


) 
} 


// 关 闭 HINTERNET 句柄 
InternetCloseHandle(hDir); 


// 将 光标 换 成 箭头 形状 
SetCursor(LoadCursor(NULL, IDC_ARROW) ) ; 


// 返 回 
return TRUE; 


else 


// 处 理 错误 
ErrorOut (hX, GetLastError(), 
TEXT("InternetFindNextFile")); 


// 关 闭 HINTERNET 句柄 
InternetCloseHandle(hDir); 


// 将 光标 换 成 箭头 形状 
SetCursor(LoadCursor(NULL, IDC ARROW)); 


/ hib Vl 
return FALSE; 


// 将 文件 名 写 人 一 个 字符 串 
StringCchPrintf(DirList, MAX PATH, pDirInfo.cFileName); 


// 检 查 文件 的 类 型 

if(pDirInfo.dwFileAttributes == FILE ATTRIBUTE DIRECTORY) 

{ 
// 添 加 < DIR> 表 示 这 是 一 个 用 户 目 录 
StringCchCat(DirList, MAX PATH, TEXT(" « DIR» ")); 
//TOD0: 添 加 与 错误 处 理 代码 

) 


// 添 加 文件 名 或 目录 到 列表 框 
SendDlglItemMessage(hX, lstDirectory, LB ADDSTRING, 
0, (LPARAM)DirList); 


while ( TRUE); 


4.1.3. 3X 


B] HINTERNET 句柄 


所 有 层次 的 HINTERNET 句柄 都 可 以 使 用 InternetCloseHandle 函数 关闭 ,程序 应 该 根据 


HINTERNET 句柄 


的 次 序 依 次 调用 InternetCloseHandle 函数 ,最 后 关闭 HINTERNET 根 句 
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柄 。 其 示例 代码 如 下 : 


HINTERNET hRootHandle, hOpenUrlHandle; 

hRootHandle = InternetOpen( TEXT("Example"), 
INTERNET OPEN TYPE DIRECT, 
NULL, 
NULL, 0); 


hOpenUrlHandle = InternetOpenUrl(hRootHandle, 
TEXT( "http://www. server. com/default. htm"), NULL, 0, 
INTERNET FLAG RAW DATA,0); 


// 先 关闭 InternetOpenUrl 创建 的 句柄 ,才能 关闭 InternetOpen 创建 的 句柄 
InternetCloseHandle(hOpenUrlHandle); 


// 关 闭 InternetOpen 创建 的 句柄 
InternetCloseHandle(hRootHandle); 


à.2 Winlnet FTP 编程 


WinInet 提供 了 一 组 操作 FTP 服务 器 上 的 文件 和 目录 的 函数 。 在 客户 机 与 服务 器 建 
立会 话 之 前 ,一 般 先 用 InternetOpen 函数 获取 根 句 柄 HINTERNET, 然 后 用 InternetConnect PR 
数 创建 FTP 会 话 句柄 。 

可 以 对 FTP 服务 器 实现 的 操作 如 下 : 

CD 进入 .退出 目录 。 

(2) 遍历 ,创建 .删除 和 重 命名 目录 。 

(3) 重 命 名 、 上 传 、 下 载 和 删除 文件 。 


4.2.1 FTP API 简介 


WinInet 提供 的 FTP API 如 表 4.2 所 示 。FtpGetCurrentDirectory 和 FtpSetCurrentDirectory 
根据 InternetConnect 返回 的 句柄 提供 目录 导航 服务 ,进入 或 退出 子 目录 。 

目录 文件 的 检索 遍历 使 用 FtpFindFirstFile 和 InternetFindNextFile 联合 完成 。 

FtpFindFirstFile 使 用 InternetConnect 返回 的 句柄 找到 匹配 检索 条 件 的 第 一 个 文件 或 
子 目录 ,InternetFindNextFile 使 用 FtpFindFirstFile 返回 的 句柄 继续 检索 下 一 个 文件 或 子 
目录 ,程序 反复 使 用 InternetFindNextFile 直至 没有 文件 目录 可 以 检索 为 止 。 

FtpCreateDirectory 用 于 创建 新 目录 ,目录 名 称 用 字符 串 形式 在 参数 中 指定 ,可 以 是 相 
对 路 径 或 绝对 路 径 ,句柄 参数 需要 先 用 InternetConnect 创建 返回 。 

FtpRenameFile 用 于 修改 目录 或 文件 名 称 , 参 数 可 用 相对 路 径 或 绝对 路 径 指定 文件 或 
目录 。 

上 传 文件 使 用 FtpPutFile 或 FtpOpenFile 函数 ,其 中 ,FtpOpenFile 需要 与 InternetWriteFile 
一 起 使 用 。FtpPutFile 适合 上 传 本 地 已 经 存在 的 文件 ,FtpOpenFile 和 InternetWriteFile 适 
合 将 数据 直接 上 传 到 FTP 服务 器 上 的 文件 中 。 

下 载 或 读 取 文 件 使 用 FtpGetFile 或 FtpOpenFile 函数 ,其 中 , FtpOpenFile 需要 与 
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InternetReadFile 联合 使 用 。FtpGetFile 用 于 从 FTP 服务 器 下 载 文 件 , FtpOpenFile 和 
InternetReadFile 能 够 控制 信息 的 下 载 进 程 。 

FtpDeleteFile 删除 FTP 服务 器 上 的 文件 ,文件 可 以 用 相对 路 径 或 绝对 路 径 形式 指定 ， 
在 使 用 FtpDeleteFile 之 前 需要 用 InternetConnect 获取 文件 句柄 。 


表 4.2 WinInet 提供 的 FTP API 


FTP 函数 功能 描述 
FtpCreateDirectory 在 服务 器 上 创建 新 目录 
FtpDeleteFile 从 服务 器 上 删除 一 个 文件 
FtpFindFirstFile 在 服务 器 当前 目录 中 开始 检索 第 一 个 文件 或 子 目录 
FtpGetCurrentDirectory 获取 服务 器 的 当前 目录 
FtpGetFile 从 服务 器 下 载 文件 
FtpOpenFile 打开 服务 器 文件 用 于 读 或 写 
FtpPutFile 上 传 文件 到 服务 器 
FtpRemoveDirectory 删除 服务 器 目录 
FtpRenameFile 重 命名 服务 器 文件 
FtpSetCurrentDirectory 切换 服务 器 的 当前 目录 
InternetWriteFile 向 服务 器 上 打开 的 文件 中 写 数 据 


4.2.2 FTP 服务 器 文件 目录 遍历 


遍历 FTP 服务 器 目录 需要 使 用 FtpFindFirstFile 函数 创建 的 句柄 ,这 个 句柄 是 
InternetConnect 困 数 返回 句柄 的 子 句 柄 。FtpFindFirstFile 定位 第 一 个 文件 或 子 目 录 并 将 
数据 以 WIN32_FIND_DATA 结构 形式 返回 ,接着 使 用 InternetFindNextFile 直到 返回 
ERROR_NO_MORE_FILES 为 止 。 

用 户 可 以 通过 检查 WIN32_FIND_DATA 结构 中 的 dwFileAttributes 成 员 值 是 否 为 
FILE_ATTRIBUTE_DIRECTORY 来 判断 FtpFindFirstFile 或 InternetFindNextFile 返回 
的 是 否 是 子 目 录 。 

如 果 客 户 程序 修改 了 服务 器 目录 ,或 服务 器 目录 定时 发 生变 化 ,应 当 将 FtpFindFirstFile 
困 数 参数 标识 设置 为 INTERNET_FLAG_NO_CACHE_WRITE 和 INTERNET_FLAG_ 
RELOAD, 以 确保 返回 的 目录 是 最 新 的 。 

完成 目录 遍历 之 后 ,必须 调用 InternetCloseHandle 关闭 用 FtpFindFirstFile 创建 的 句 
Ai ,在 关闭 期 间 ,不 能 继续 使 用 InternetConnect 创建 的 句柄 调用 FtpFindFirstFile 函数 ,和 否 
则 会 返回 ERROR_FTP_TRANSFER_IN_PROGRESS 错误 。 

下 面 的 程序 4.4 遍历 FTP 服务 器 目录 并 在 列表 框 中 显示 ,hConnection 参数 指定 的 句 
liii InternetConnect 函数 返回 。 

程序 4.4 遍历 FTP 服务 器 目录 并 在 列表 框 中 显示 


* include < windows. h> 
# include < strsafe. h> 
# include < WinInet.h> 


# pragma comment(lib, "WinInet.lib") 


$8435 Windows Internet 编 程 


# pragma comment(lib, "user32. lib") 
# define FTP FUNCTIONS BUFFER SIZE MAX PATH- 8 


BOOL WINAPI DisplayFtpDir( 
HWND hDlg, 
HINTERNET hConnection, 
DWORD dwFindFlags, 
int nListBoxId ) 


WIN32 FIND DATA dirInfo; 


HINTERNET hFind; 

DWORD dwError; 

BOOL retVal = FALSE; 

TCHAR szMsgBuffer[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szFName[FTP FUNCTIONS BUFFER SIZE]; 


SendDlgItemMessage( hDlg, nListBoxId, LB RESETCONTENT, 0, 0 ); 
hFind = FtpFindFirstFile( hConnection, TEXT( " * . « " ), 
&dirInfo, dwFindFlags, 0 ); 
if ( hFind == NULL) 
{ 
dwError = GetLastError(); 
if( dwError == ERROR NO MORE FILES ) 
{ 
StringCchCopy( szMsgBuffer, FTP FUNCTIONS BUFFER SIZE, 
TEXT( "No files found at FTP location specified." ) ); 
retVal - TRUE; 
goto DisplayDirError 1; 
) 
StringCchCopy( szMsgBuffer, FTP_FUNCTIONS_BUFFER_SIZE, 
TEXT( "FtpFindFirstFile failed." ) ); 
goto DisplayDirError_1; 


do 
{ 
if( FAILED( StringCchCopy( szFName, FTP FUNCTIONS BUFFER SIZE, 
dirInfo.cFileName ) ) || 
( ( dirInfo.dwFileAttributes & FILE ATTRIBUTE DIRECTORY ) && 
( FAILED( StringCchCat( szFName, FTP FUNCTIONS BUFFER SIZE, 
TEXT( " «DIR2") ) ) ) ) ) 


StringCchCopy( szMsgBuffer, FTP FUNCTIONS BUFFER SIZE, 
TEXT( "Failed to copy a file or directory name." ) ); 

retVal - FALSE; 
goto DisplayDirError 2; 

) 

SendDlgItemMessage( hDlg, nListBoxId, LB ADDSTRING, 

0, (LPARAM) szFName ) ; 
} while( InternetFindNextFile( hFind, (LPVOID) &dirInfo ) ); 


if( ( dwError - GetLastError() ) -- ERROR NO MORE FILES ) 
{ 
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InternetCloseHandle(hFind); 
return( TRUE ); 

) 

StringCchCopy( szMsgBuffer, FTP FUNCTIONS BUFFER SIZE, 
TEXT( "FtpFindNextFile failed." ) ); 


DisplayDirError 2: 
InternetCloseHandle( hFind ); 
DisplayDirError 1: 
MessageBox( hDlg, 
(LPCTSTR) szMsgBuffer, 
TEXT( "DisplayFtpDir() Problem" ), 
MB OK | MB ICONERROR ) ; 
return( retVal ); 


) 


4.2.3 FTP 服务 器 目录 导航 


FtpGetCurrentDirectory 和 FtpSetCurrentDirectory 函数 联合 能 够 完成 服务 器 目录 的 
导航 操作 。 其 中 ,FtpGetCurrentDirectory 用 于 返回 服务 器 的 当前 目录 ,目录 名 称 中 包含 根 
目录 。FtpSetCurrentDirectory 用 于 改变 服务 器 当前 的 工作 目录 ,参数 中 指定 的 目录 信息 可 
以 是 相对 路 径 或 绝对 路 径 。 例 如 ,如 果 当 前 路 径 是 “public/info” ,参数 指定 的 相对 路 径 是 “ftp/ 
example”, 那 么 FtpSetCurrentDirectory 最 终 设 定 的 路 径 为 ~public/info/ftp/example”。 

程序 4. 5 中 的 hConnection 句柄 参数 仍然 由 InternetConnect 函数 返回 ,新 的 目录 名 称 
由 父 对 话 框 中 的 文本 框 指定 ,文本 框 的 IDC 作为 参数 传递 给 nDirNameld。 程 序 4. 5 最 后 


调用 了 程序 4. 4 进行 新 目录 的 遍历 和 显示 。 
程序 4.5 ”更改 当前 目录 并 显示 


BOOL WINAPI ChangeFtpDir( HWND hDlg, 
HINTERNET hConnection, 
int nDirNameld, 
int nListBoxId ) 


DWORD dwSize; 

TCHAR szNewDirName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szOldDirName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR* szFailedFunctionName; 


dwSize - FTP FUNCTIONS BUFFER SIZE; 


if( !GetDlgItemText( hDlg, nDirNameId, szNewDirName, dwSize ) ) 


{ 
szFailedFunctionName = TEXT( "GetDlgItemText" ); 
goto ChangeFtpDirError; 

} 


if ( !FtpGetCurrentDirectory( hConnection, szOldDirName, &dwSize )) 


( 


szFailedFunctionName = TEXT( "FtpGetCurrentDirectory" ); 


goto ChangeFtpDirError; 
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if( !SetDlgItemText( hDlg, nDirNameId, szOldDirName ) ) 
{ 
szFailedFunctionName = TEXT( "SetDlgItemText" ); 
goto ChangeFtpDirError; 
) 


if( !FtpSetCurrentDirectory( hConnection, szNewDirName ) ) 
{ 
szFailedFunctionName = TEXT( "FtpSetCurrentDirectory" ); 
goto ChangeFtpDirError; 


} 
return( DisplayFtpDir( hDlg, hConnection, 0, nListBoxId ) ); 


ChangeFtpDirError: 
InternetErrorOut( hDlg, GetLastError(), szFailedFunctionName ); 
DisplayFtpDir( hDlg, hConnection, INTERNET FLAG RELOAD, nListBoxId); 
return( FALSE ) 7 

) 


4.2.4 创建 和 删除 FTP 服务 器 目录 
WinInet 提供 了 在 FTP 服务 器 上 创建 和 删除 目录 的 函数 ,在 使 用 这 些 函 数 前 用 户 需要 


具有 服务 器 操作 权限 并 登录 服务 器 。 在 使 用 FtpCreateDirectory 函数 之 前 ,用 户 需 要 首先 
获取 一 个 拥有 创建 目录 权限 的 FTP 会 话 句柄 。 下 面 的 代码 示例 中 的 hFtpSession 由 
InternetConnect 函数 返回 ,当前 目录 假定 为 根 目 录 。 


/* 在 当前 根 目录 下 创建 子 目录 test* / 
FtpCreateDirectory( hFtpSession, "test" ); 


/* 在 test 子 目录 中 创建 example 子 目录 * / 
FtpCreateDirectory( hFtpSession, "\\test\\example" ); 


下 面 的 代码 演示 了 FtpRemoveDirectory 的 两 种 用 法 , 且 当 前 目录 为 根 目 录 , 根 目录 中 


包含 test 子 目 录 ,test 中 包含 example FHR. 


/* 从 test 目录 中 删除 子 目 录 example 及 其 包含 的 所 有 文件 和 子 目录 * / 
FtpRemoveDirectory(hFtpSession, "\\test\\example" ); 


/* 从 根 目录 中 删除 test 子 目录 及 其 包含 的 所 有 文件 和 子 目 录 */ 
FtpRemoveDirectory(hFtpSession, "test"); 


程序 4.6 在 FTP 服务 器 上 创建 新 目录 ,目录 名 称 由 父 对话 框 中 的 文本 框 指定 ,文本 框 


的 IDC 作为 参数 传递 给 nDirNameId,hConnection 句柄 由 InternetConnect 返回 ,最 后 调用 
DisplayFtpDir 显示 目录 列表 。 


程序 4.6 在 FTP 服务 器 上 创建 新 目录 


BOOL WINAPI CreateFtpDir( HWND hDlg, HINTERNET hConnection, 
int nDirNameId, int nListBoxId ) 
( 
TCHAR szNewDirName[FTP FUNCTIONS BUFFER SIZE]; 
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if( !GetDlgItemText( hDlg, nDirNameId, 
szNewDirName, 
FTP FUNCTIONS BUFFER SIZE ) ) 
{ 
MessageBox( hDlg, 
TEXT( "Error: Directory Name Must Be Specified" ), 
TEXT( "Create FTP Directory" ), 
MB OK | MB ICONERROR ); 
return( FALSE ); 
} 


if( !FtpCreateDirectory( hConnection, szNewDirName ) ) 
{ 
InternetErrorOut( hDlg, GetLastError(), 
TEXT( "FtpCreateDirectory" ) ); 
return( FALSE ); 
) 


return( DisplayFtpDir( hDlg, hConnection, 
INTERNET FLAG RELOAD, 
nListBoxld ) ); 
) 


程序 4.7 从 FTP 服务 器 上 删除 目录 ,目录 名 称 由 父 对 话 框 中 的 文本 框 指定 ,文本 框 的 
IDC 作为 参数 传递 给 nDirNameld. hConnection 句柄 由 InternetConnect 返回 ,最 后 调用 
DisplayFtpDir 显示 目录 列表 。 

程序 4.7. 从 FTP 服务 器 上 删除 目录 


BOOL WINAPI RemoveFtpDir( HWND hDlg, HINTERNET hConnection, 
int nDirNameId, int nListBoxId ) 
{ 
TCHAR szDelDirName[FTP FUNCTIONS BUFFER SIZE]; 


if( !GetDlgItemText( hDlg, nDirNameId, szDelDirName, 
FTP FUNCTIONS BUFFER SIZE ) ) 
{ 
MessageBox( hDlg, 
TEXT( "Error: Directory Name Must Be Specified" ), 
TEXT( "Remove FTP Directory" ), 
MB OK | MB ICONERROR ); 
return( FALSE ) ; 
) 


if( !FtpRemoveDirectory( hConnection, szDelDirName ) ) 
{ 
InternetErrorOut( hDlg, GetLastError(), 
TEXT( "FtpRemoveDirectory" ) ); 
return( FALSE ); 
) 


return( DisplayFtpDir( hDlg, hConnection, 
INTERNET FLAG RELOAD, nListBoxld ) ); 
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4.2.5 从 FTP 服务 器 上 获取 文件 


从 FTP 服务 器 上 获取 文件 有 以 下 3 种 方法 : 

(1) 联合 使 用 InternetOpenUrl 和 InternetReadFile 读 取 文件 。 

(2) 联合 使 用 FtpOpenFile 和 InternetReadFile 读 取 文 件 。 

(3) 使 用 FtpGetFile 下 载 文件 。 

关于 前 两 种 使 用 InternetReadFile 函数 的 编程 方法 ,请 参见 程序 4. 1 和 程序 4. 2。 

如 果 目 标 文件 的 URL 可 用 ,客户 程序 可 以 调用 InternetOpenUrl 连接 到 这 个 URL, 然 
后 使 用 InternetReadFile 控制 文件 下 载 的 进程 。 

如 果 客 户 机 已 经 通过 InternetConnect 与 服务 器 建立 FTP 会 话 ,那么 使 用 FtpOpenFile 
打开 已 经 存在 的 文件 ,然后 使 用 InternetReadFile 下 载 文件 。 

如 果 客 户 机 下 载 时 不 需要 对 下 载 进程 进行 控制 , 则 使 用 FtpGetFile 指定 远程 文件 名 和 
本 地 文件 名 后 下 载 更 为 简单 。 下 面 给 出 的 程序 4.8 从 远程 服务 器 下 载 文件 到 本 地 存储 , 文 
件 名 通过 父 对 话 框 中 的 文本 框 获 得 ,文本 框 的 IDC 传递 给 nFtpFileNameld 参数 ,下 载 文件 
的 本 地 存储 名 称 从 父 对 话 框 中 的 文本 框 获得 ,这 个 文本 框 的 IDC 传递 给 nLocalFileNameld 
参数 ,hConnection 句柄 仍然 由 InternetConnect 返回 。 

程序 4.8 ”从 远程 服务 器 下 载 文 件 


BOOL WINAPI GetFtpFile( HWND hDlg, HINTERNET hConnection, 
int nFtpFileNameld, int nLocalFileNameld ) 
{ 
TCHAR szFtpFileName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szLocalFileName[FTP FUNCTIONS BUFFER SIZE]; 
DWORD dwTransferType; 
TCHAR szBoxTitle[] = TEXT( "Download FTP File" ); 
TCHAR szAsciiQuery[] = 
TEXT("Do you want to download as ASCII text?(Default is binary)"); 
TCHAR szAsciiDone[] = 
TEXT( "ASCII Transfer completed successfully..." ); 
TCHAR szBinaryDone[] = 
TEXT( "Binary Transfer completed successfully..." ); 


if( !GetDlgItemText( hDlg, nFtpFileNameld, szFtpFileName, 
FTP FUNCTIONS BUFFER SIZE ) || 
!GetDlgItemText( hDlg, nLocalFileNameld, szLocalFileName, 
FTP FUNCTIONS BUFFER SIZE ) ) 
{ 
MessageBox( hDlg, 
TEXT( "Target File or Destination File Missing" ), 
szBoxTitle, 
MB OK | MB ICONERROR ) ; 
return( FALSE ); 
) 


dwTransferType = ( MessageBox( hDlg, 
szAsciiQuery, 
szBoxTitle, 
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MB YESNO ) == IDYES ) ? 
FTP TRANSFER TYPE ASCII : FTP TRANSFER TYPE BINARY; 
dwTransferType | = INTERNET FLAG RELOAD; 


if( !FtpGetFile( hConnection, szFtpFileName, szLocalFileName, FALSE, 
FILE ATTRIBUTE NORMAL, dwTransferType, 0 ) ) 


{ 
InternetErrorOut( hDlg, GetLastError(), TEXT( "FtpGetFile" ) ); 


return( FALSE ); 
) 


MessageBox( hDlg,( dwTransferType == 
(FTP TRANSFER TYPE ASCII | INTERNET FLAG RELOAD)) ? 
szAsciiDone : szBinaryDone, szBoxTitle, MB OK ); 
return( TRUE ) ; 


4.2.6 上 传 文件 到 FTP 服务 器 


上 传 文件 到 FTP 服务 器 有 以 下 两 种 方法 : 
(1) 联合 使 用 FtpOpenFile 和 InternetWriteFile 上 传 。 
(2) 使 用 FtpPutFile 上 传 。 


如 果 客 户 机 上 传 的 数据 不 是 以 文件 的 形式 提供 的 ,那么 应 当 使 用 FtpOpenFile 在 FTP 
服务 上 创建 并 打开 一 个 新 文件 ,然后 使 用 InternetWriteFile 函数 向 文件 中 写 和 数据。 如果 
存在 上 传 的 本 地 文件 ,那么 使 用 FtpPutFile 将 文件 直接 从 本 地 上 传 到 远程 FTP 服务 器 。 

下 面 的 程序 4. 9 将 本 地 文件 复制 到 远程 FTP 服务 器 。 本 地 文件 名 由 父 对 话 框 中 的 文 
本 框 获得 ,文本 框 的 IDC 传递 给 参数 nLocalFileNameld, 文 件 上 传 FTP 服务 器 后 的 文件 名 
仍 由 父 对 话 框 中 的 文本 框 获得 ,文本 框 的 IDC 传递 给 nFtpFileNameld 参数 ,hConnection 
句柄 由 InternetConnect 返回 。 


程序 4.9 上 传 文件 到 FTP 服务 器 


BOOL WINAPI PutFtpFile( HWND hDlg, HINTERNET hConnection, 
int nFtpFileNameld, int nLocalFileNameld ) 
{ 
TCHAR szFtpFileName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szLocalFileName[FTP FUNCTIONS BUFFER SIZE]; 
DWORD dwTransferType; 
TCHAR szBoxTitle[] - TEXT( "Upload FTP File" ); 
TCHAR szASCIIQuery[] = 
TEXT("Do you want to upload as ASCII text? (Default is binary)"); 
TCHAR szAsciiDone[] = 
TEXT( "ASCII Transfer completed successfully..." ); 
TCHAR szBinaryDone[] - 
TEXT( "Binary Transfer completed successfully..." ); 


if( !GetDlgItemText( hDlg, nFtpFileNameld, szFtpFileName, 
FTP FUNCTIONS BUFFER SIZE) || 

!GetDlgltemText( hDlg, nLocalFileNameId, szLocalFileName, 
FTP FUNCTIONS BUFFER SIZE) ) 
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{ 
MessageBox( hDlg, 
TEXT("Target File or Destination File Missing"), 
szBoxTitle, 
MB_OK | MB_ICONERROR ); 
return( FALSE ); 
) 


dwTransferType - 
( MessageBox( hDlg, 
szASCIIQuery, 
szBoxTitle, 
MB YESNO ) == IDYES ) ? 
FTP TRANSFER TYPE ASCII : FTP TRANSFER TYPE BINARY; 


if( !FtpPutFile( hConnection, 
szLocalFileName, 
szFtpFileName, 
dwTransferType, 
0)) 
{ 
InternetErrorOut( hDlg, GetLastError(), TEXT( "FtpGetFile" ) ); 
return( FALSE ) ; 
) 


MessageBox( hDlg, 
( dwTransferType == FTP TRANSFER TYPE ASCII ) ? 
SzAsciiDone : szBinaryDone, szBoxTitle, MB OK ); 
return( TRUE ); 


4.2.7 JA FTP 服务 器 上 删除 文件 


调用 FtpDeleteFile 函数 从 服务 器 上 删除 文件 ,在 删除 文件 之 前 用 户 必须 具有 删除 权 
限 。 程 序 4. 10 演示 了 如 何 从 FTP 服务 器 上 删除 文件 ,被 删除 的 文件 名 称 从 父 对 话 框 中 的 


文本 框 获取 ,文本 框 的 IDC 传递 给 nFtpFileNameld 参数 。 
程序 4.10 从 FTP 服务 器 上 删除 文件 


BOOL WINAPI DeleteFtpFile( HWND hDlg, HINTERNET hConnection, 


( 


int nFtpFileNanmeld ) 


TCHAR szFtpFileName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szBoxTitle[] - TEXT( "Delete FTP File" ); 


if( !GetDlgItemText( hDlg, nFtpFileNameld, szFtpFileName, 
FTP FUNCTIONS BUFFER SIZE ) ) 
{ 
MessageBox( hDlg, TEXT( "File Name Must Be Specified!" ), 
szBoxTitle, MB OK | MB ICONERROR ); 
return( FALSE ); 
) 
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if( !FtpDeleteFile( hConnection, szFtpFileName ) ) 
{ 
InternetErrorOut( hDlg, 
GetLastError(), 
TEXT( "FtpDeleteFile" ) ); 
return( FALSE ); 
} 


MessageBox( hDlg, 
TEXT( "File has been deleted" ), 
szBoxTitle, 
MB 0K ); 
return( TRUE ); 
) 


4.2.8 FTP 服务 器 目录 或 文件 的 重 命名 


对 于 目录 或 文件 的 重 命名 使 用 FtpRenameFile 函数 ,FtpRenameFile 函数 用 以 NULL. 
结尾 的 字符 串 表 示 绝 对 目录 名 或 相对 目录 名 ,第 一 个 字符 串 参数 指定 旧 的 目录 名 或 文件 名 ， 
第 二 个 字符 串 参 数 指定 新 的 目录 名 或 文件 名 。 程 序 4. 11 演示 了 重 命 名 过 程 , 文 件 或 目录 的 
当前 名 称 由 父 对 话 框 中 的 文本 框 获取 ,文本 框 的 IDC 传递 给 nOldFileNameld 参数 ,新 名 称 
仍 由 父 对 话 框 中 的 文本 框 获取 ,文本 框 的 IDC 传递 给 nNewFileNameId 参数 ,hConnection 
参数 使 用 的 句柄 由 InternetConnect 函数 返回 。 重 命名 函数 完成 后 并 不 自动 刷新 目录 列表 ， 
所 以 用 户 需要 在 程序 中 单独 做 刷新 操作 。 

程序 4.11 FTP 服务 器 目录 或 文件 的 重 命名 


BOOL WINAPI RenameFtpFile( HWND hDlg, HINTERNET hConnection, 
int nOldFileNameId, int nNewFileNameld ) 
{ 
TCHAR szOldFileName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szNewFileName[FTP FUNCTIONS BUFFER SIZE]; 
TCHAR szBoxTitle[] = TEXT( "Rename FTP File" ); 


if( !GetDlgItemText( hDlg, nOldFileNameId, szOldFileName, 
FTP FUNCTIONS BUFFER SIZE) || 
!GetDlgItemText( hDlg, nNewFileNameId, szNewFileName, 
FTP FUNCTIONS BUFFER SIZE ) ) 
{ 
MessageBox( hDlg, 
TEXT( "Both the current and new file names must be supplied" ), 
szBoxTitle, 
MB OK | MB ICONERROR ); 
return( FALSE ) ; 
) 


if( !FtpRenameFile( hConnection, szOldFileName, szNewFileName ) ) 
{ 
MessageBox( hDlg, 
TEXT( "FtpRenameFile failed" ), 
szBoxTitle, 
MB OK | MB ICONERROR ); 
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return( FALSE ); 
) 
return( TRUE ) ; 
) 


人 3 Winlnet HTTP 编程 


WinInet 提供 了 一 组 函数 用 于 访问 World Wide Web WWW), WWW 需要 通过 HTTP 
协议 访问 ,HTTP API 对 HTTP 协议 进行 了 抽象 和 封装 。 


4.3.1 HTTP API 基本 操作 


在 前 面 曾 用 图 4.5 展示 了 HTTP 函数 间 的 关联 ,这 些 用 于 WWW 访问 的 WinInet K 
数 可 以 归纳 为 以 下 几 种 : 

(1) 建立 WWW 连接 。 

(2) 打开 一 个 请 求 。 

(3) 添加 请 求 头 。 

(4) 发 送 请 求 。 

(5) 发 送 数 据 到 服务 器 。 

(6) 获取 请 求 的 信息 。 

CO 从 WWW 下 载 资源 。 

表 4.3 给 出 了 HTTP 会 话 常用 的 函数 及 其 功能 描述 。 

表 4.3 HTTP 会 话 常用 的 函数 


OC 


E] 数 功能 描述 

下 AR HTTP 请 求 头 到 一 个 HTTP 请 求 句 柄 ,请 求 句 柄 由 HttpOpenRequest 
HttpOpenRequest 打开 一 个 HTTP 请 求 , 需 要 的 句柄 由 InternetConnect 函数 提供 

返回 一 个 HTTP 请 求 的 查询 信息 ,需要 的 句柄 由 HttpOpenRequest 或 
HttpQueryInfo 

InternetOpenUrl 提供 

发 送 指定 的 HTTP 请 求 到 HTTP 服务 器 ,需要 的 句柄 由 HttpOpenRequest 
HttpSendRequest 提供 
InternetErrorDlg 用 预定 义 的 对 话 框 显示 错误 信息 ,需要 的 句柄 由 HttpSendRequest 提供 


1. 建立 WWW 连接 


建立 WWW 连接 ,必须 使 用 InternetConnect 函数 ,该 函数 用 于 建立 一 个 到 指定 站 点 的 
FTP 或 HTTP 会话。 该 函数 使 用 的 根 句 柄 hInternet 由 InternetOpen 创建 ,InternetConnect 设 
定 参 数 dwService 的 值 为 INTERNET_SERVICE_HTTP, 以 保证 建立 的 是 HTTP 会 话 。 

InternetConnect 函数 的 语法 如 下 : 


HINTERNET InternetConnect( 
.In  HINTERNET hInternet, 
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_In LPCTSTR lpszServerName, 
.In INTERNET_PORT nServerPort, 
.In  LPCTSTR lpszUsername, 

.In  LPCTSTR lpszPassword, 

.In  DWORD dwService, 

.In  DWORD dwFlags, 

.In DWORD PTR dwContext 


下 面 给 出 的 程序 4. 12 演示 了 建立 WWW 连接 需要 完成 的 步骤 。 
程序 4.12 建立 WWW 连接 


HINTERNET hOpenHandle,  hConnectHandle, hResourceHandle; 
DWORD dwError, dwErrorCode; 
HWND hwnd = GetConsoleWindow(); 


hOpenHandle = InternetOpen(TEXT("Example"), 
INTERNET OPEN TYPE PRECONFIG, 
NULL, NULL, 0); 


hConnectHandle = InternetConnect(hOpenHandle, 
TEXT("www. server. com"), 
INTERNET_INVALID_PORT_NUMBER, 
NULL, 
NULL, 
INTERNET_SERVICE_HTTP, 
0,0); 


hResourceHandle = HttpOpenRequest(hConnectHandle, TEXT("GET"), 
TEXT(" /prenium/default. htm"), 
NULL, NULL, NULL, 
INTERNET FLAG KEEP CONNECTION, 0); 

resend: 

HttpSendRequest(hResourceHandle, NULL, 0, NULL, 0); 


// 用 dwErrorCode 存储 与 调用 
//HttpSendRequest 相关 的 错误 代码 


dwErrorCode = hResourceHandle ? ERROR SUCCESS : GetLastError(); 


dwError - InternetErrorDlg(hwnd, hResourceHandle, dwErrorCode, 
FLAGS ERROR UI FILTER FOR ERRORS | 
FLAGS ERROR UI FLAGS CHANGE OPTIONS | 
FLAGS ERROR UI FLAGS GENERATE DATA, 
NULL); 


if (dwError -- ERROR INTERNET FORCE RETRY) 
goto resend; 


// 在 此 处 可 以 插入 从 hResourceHandle 读 取 数据 的 代码 


2. 打开 一 个 请 求 


HttpOpenRequest 函数 用 于 打开 一 个 HTTP 请 求 并 返回 一 个 HINTERNET 句柄 供 其 
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他 HTTP 函数 使 用 。 与 FtpOpenFile 和 InternetOpenUrl 函数 不 同 的 是 ,HttpOpenRequest PK 
数 在 被 调用 时 并 不 将 请 求 发 送 到 Internet, 发 送 请 求 建立 会 话 的 工作 由 HttpSendRequest 


函数 接着 完成 。 
HttpOpenRequest 函数 的 主要 作用 是 创建 一 个 请 求 句 柄 ,其 语法 如 下 : 


HINTERNET HttpOpenRequest( 
_In HINTERNET hConnect, 
.In LPCTSTR lpszVerb, 
.In LPCTSTR lpszObjectName, 
In LPCTSTR lpszVersion, 
In LPCTSTR lpszReferer, 
In  LPCTSTR * lplpszAcceptTypes, 
_In_ DWORD dwFlags, 
_In DWORD_PTR dwContext 
E 
HttpOpenRequest 函数 的 用 法 示例 如 下 : 


hHttpRequest = HttpOpenRequest( hHttpSession, "GET", "", NULL, "", NULL, 0, 0); 


3. 添加 请 求 头 


HttpAddRequestHeaders 函数 用 于 向 请 求 句柄 头 部 添加 一 个 或 多 个 请 求 头 信息 ,在 使 
用 这 个 函数 前 需要 先 用 HttpOpenRequest 函数 打开 请 求 , 添 加 请 求 头 可 以 满足 某 些 需 要 精 


确 地 控制 向 HTTP 服务 器 发 送 请 求 信息 的 应 用 场合 。 该 函数 的 语法 如 下 s 


BOOL HttpAddRequestHeaders( 
.In  HINTERNET hRequest, 
.In  LFPCTSTR lpszHeaders, 
.In DWORD dwHeadersLength, 
.In DWORD dwModifiers 

) 

其 用 法 示例 参见 程序 4. 12。 


4. 发 送 请 求 


HttpSendRequest 函数 用 于 建立 到 指定 服务 器 的 连接 并 发 送 请 求 ,使 用 的 HINTERNET 
句柄 由 HttpOpenRequest 函数 创建 。HttpSendRequest 函数 的 发 送 方 式 为 PUT 或 POST。 


其 语法 如 下 : 


BOOL HttpSendRequest( 
HINTERNET hRequest, 
LPCTSTR lpszHeaders, 
DWORD dwHeadersLength, 
LPVOID lpOptional, 
DWORD dwOptionalLength 
m 


InternetQueryDataA vailable, InternetSetFilePointer 函数 从 服务 器 获取 信息 。 其 
参见 程序 4. 12。 


HttpSendRequest 函数 发 送 请 求 后 ,客户 程序 才 可 以 使 用 InternetReadFile、 


日 法 示例 
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5. 发 送 数 据 到 服务 器 


如 果 要 向 服务 器 发 送 数据 ,HttpOpenRequest 函数 的 lpszVerb 参数 必须 指定 为 POST 
或 PUT, 并 将 存放 发 送 数据 缓冲 区 的 地 址 传递 给 IpOptional 参数 ,将 dwOptionalLength it 
置 为 缓冲 区 数据 的 长 度 。 
使 用 InternetWriteFile 函数 发 送 数据 ,HINTERNET 句柄 需要 由 HttpSendRequestEx 
函数 创建 。 
InternetWriteFile 函数 用 于 向 服务 器 文件 写 数据 ,其 语法 如 下 : 
BOOL InternetWriteFile( 
_In HINTERNET hFile, 
_In LPCVOID lpBuffer, 
_In DWORD dwNumberOfBytesToWrite, 


.Out LPDWORD lpdwNumberOfBytesWritten 
); 


6. 获取 请 求 的 信息 


HttpQueryInfo 函数 负责 从 HTTP. 请 求 获取 信息 ,参数 句柄 HINTERNET 由 
HttpOpenRequest 或 InternetOpenUrl 函数 创建 。 其 语法 如 下 : 
BOOL HttpQueryInfo( 
In. HINTERNET hRequest, 
.In. DWORD dwInfoLevel, 
_Inout_ LPVOID lpvBuffer, 
_Inout_ LPDWORD lpdwBufferLength, 
_Inout_ LPDWORD lpdwIndex 
); 


7. 从 WWW 下 载 资源 


在 使 用 HttpOpenRequest 函数 打开 一 个 请 求 .并 使 用 HttpSendRequest 函数 发 送 请 求 到 服 
务 器 后 ,就 可 以 使 用 InternetReadFile InternetQueryDataA vailable, InternetSetFilePointer 函数 
从 HTTP 服务 器 获取 信息 了 。 

大 家 还 记得 前 面 给 出 的 程序 4. 1 吗 ? 这 个 程序 正 是 使 用 上 述 函 数 实现 了 目标 资源 的 
下 载 。 


4.3.2 HTTP Cookies 编程 


HTTP Cookies 提供 了 一 种 将 服务 器 信息 保存 到 客户 机 的 机 制 , 共 有 两 种 类 型 的 
Cookie Header, 一 种 是 Set-Cookie Header, 另 一 种 是 Cookie Header, Set-Cookie Header 
是 服务 器 响应 客户 HTTP 请 求 时 发 送 给 客户 机 的 ,而 Cookie Header 是 客户 机 随 着 HTTP 
请 求 发 送 给 服务 器 的 。 

Set-Cookie Header 的 格式 如 下 : 


Set- Cookie: <name>=<value>[; < name> = < value>]... 
[; expires = < date>][ ; domain = «domain name>] 
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[; path =< some path»][; secure][; httponly] 


服务 器 用 上 述 字符 串 键 值 对 将 数据 保存 到 客户 机 。 
Cookie Header 的 格式 如 下 : 


Cookie: <name>=<value> [;« name» = < value» ]... 


InternetSetCookie fll InternetGetCookie 用 来 创建 和 管理 Cookie。 其 中 ,前 者 设置 指定 
URL 的 Cookie, 后 者 获取 指定 URL 及 其 所 有 父 级 URL 的 Cookie。 


1. 读 取 Cookie 


用 户 需要 注意 的 是 ,在 设置 或 获取 Cookie 前 不 需要 调用 InternetOpen 函数 。 拥 有 过 期 
日 期 的 Cookies 存放 在 用 户 账 户 下 的 目录 中 ,如 Users\"username"\AppData\Roaming\ 
Microsoft\ WindowsN Cookies 目录 , 低 权 限 用 户 的 Cookies 存放 在 Users\" username" 
AppData\Roaming\Microsoft\Windows\Cookies\Low 目录 下 ,不 设置 过 期 日 期 的 Cookies 
存放 在 内 存 中 ,只 对 创建 它们 的 进程 可 见 。 

InternetGetCookie 函数 的 语法 如 下 : 


BOOL InternetGetCookie( 
_In_ LPCTSTR lpszUrl, 

In. LPCTSTR lpszCookieName, 
_Out_ LPTSTR lpszCookieData, 
_Inout  LPDWORD lpdwSize 

) 


下 面 的 程序 4.13 演示 了 InternetGetCookie 函数 的 用 法 。 
程序 4.13 读 取 Cookie 


TCHAR szURL[256]; // 用 缓冲 区 保存 URL 
LPTSTR lpszData = NULL;  // 用 缓冲 区 保存 Cookie 数据 
DWORD dwSize = 0; // 缓 冲 区 的 大 小 


// 通 过 插 和 人 代码 来 检索 URL. 
retry: 


// 第 一 次 调用 InternetGetCookie 将 得 到 下 载 Cookie 数据 所 需 的 缓冲 区 的 大 小 
if (!InternetGetCookie(szURL, NULL, lpszData, &dwSize)) 
{ 
// 如 果 长 度 不 够 则 重新 分 配 缓冲 区 
if (GetLastError() == ERROR INSUFFICIENT BUFFER) 
{ 
// 分 配 必要 的 缓冲 区 
lpszData = new TCHAR[ dwSize]; 


// 再 次 调用 
goto retry; 
} 
else 
{ 
// 插 入 错误 处 理 代 码 


228 


Ne 


Windows 网 络 编程 案例 教程 


} 
} 


else 
// 通 过 插入 代码 来 显示 Cookie 数据 


// 释 放 分 配 的 缓冲 区 
delete[ ]lpszData; 


) 
2. 设置 Cookie 


通过 InternetSetCookie 函数 可 以 设置 持久 Cookie 和 会 话 Cookie, {F/A Cookie 拥有 一 
个 过 期 日 期 ,存放 在 用 户 账户 路 径 Users\" username" \ AppData \ Roaming \ Microsoft V 
Windows\ Cookies 目录 中 , 低 权 限 用 户 的 Cookie 存放 在 Users\"username"\AppData\ 
Roaming\Microsoft\Windows\Cookies\Low 目录 中 。 会 话 Cookie 只 能 存放 于 内 存 并 被 创 
建 它 的 进程 所 访问 。 创 建 Cookie 的 格式 如 下 : 

NAME = VALUE 

过 期 日 期 的 格式 如 下 : 

DAY, DD- MMM - YYYY HH:MM:SS GMT 

其 中 ,DAY 代表 星期 几 , 它 是 3 个 字母 的 缩写 ,DD 代表 当月 的 几 号 ,MMM 是 月 份 的 
字母 缩写 ,YYYY 代表 年 份 ,HH:MM:SS 代表 时 : 分 : 秒 。 

下 面 给 出 的 程序 4. 14 演示 了 使 用 InternetSetCookie 函数 创建 会 话 Cookie 和 持久 
Cookie 的 方法 。 

程序 4.14 ”创建 会 话 Cookie 和 持久 Cookie 


BOOL bReturn; 


// 创 建 会 话 Cookie 
bReturn = InternetSetCookie(TEXT("http://www.adventure works.com"), NULL, 
TEXT("TestData = Test")); 


// 创 建 持久 Cookie 
bReturn = InternetSetCookie(TEXT("http://www.adventure works.com"), NULL, 
TEXT("TestData = Test; expires = Sat,01- Jan- 2000 00:00:00 GMT")); 


4.3.3 HTTP Authentication 编程 


如 果 客 户 机 通过 HTTP 访问 服务 器 需要 经 过 验证 ,服务 器 会 返回 状态 码 401 给 客户 
机 ,如 果 通 过 代理 服务 器 访问 , 则 返回 状态 码 407 给 客户 机 。 这 些 状态 码 是 随 响 应 头 一 
起 发 送 的 ,代理 服务 器 验证 的 响应 头 为 Proxy-Authenticate, 服 务 器 验证 的 响应 头 为 
WWW-Authenticate。 例 如 ,“WWW-Authenticate: Basic Realm 王 "example"” 就 是 服务 器 
返回 给 客户 机 的 一 个 需要 验证 操作 的 响应 头 。 

客户 机 在 访问 服务 器 时 可 以 把 验证 信息 加 入 到 响应 头 中 ,例如 ,客户 机 在 收 到 服务 器 的 
Wf] y 3 *W W W-Authenticate; Basic Realm 一 "example"” 后 会 再 次 发 送 请求 并 在 请 求 中 加 入 
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“Authorization: Basic<-username:password 二 ”这 个 验证 信息 。 它 有 以 下 两 种 验证 模式 。 
(1) 基本 验证 模式 : 用 户 名 和 密码 以 明文 方式 发 送 。 
(2) 问题 提问 模式 : 客户 需要 回答 服务 器 的 提问 。 
表 4.4 列 出 了 Windows 支持 的 两 种 验证 类 型 。 
表 4.4 HTTP 验证 类 型 


验证 模型 类 型 需要 的 DLL 功能 描述 
Basic(cleartext) ”基本 Wininet. dll ”使 用 Base64 编码 加 密 包含 用 户 名 和 密码 的 字符 串 
Digest 提问 Digest. dll 服务 器 返回 客户 机 一 个 随机 数字 符 串 ,服务 器 检查 客户 提交 
的 用 户 名 、 密 码 和 随机 数字 符 串 是 否 匹配 


用 户 可 以 使 用 InternetErrorDlg 或 者 InternetSetOption 函数 处 理 HTTP 验证 。 程 
JY: 4.15 演示 了 如 何 用 InternetErrorDlg 函数 处 理 HTTP 验证 ,程序 4. 16 演示 了 如 何 用 
InternetSetOption 函数 处 理 HTTP 验证 。 

程序 4.15 用 InternetErrorDlg 处 理 HTTP 验证 


HINTERNET hOpenHandle,  hConnectHandle, hResourceHandle; 
DWORD dwError, dwErrorCode; 
HWND hwnd = GetConsoleWindow(); 


hOpenHandle = InternetOpen(TEXT("Example"), 
INTERNET OPEN TYPE PRECONFIG, 
NULL, NULL, 0); 


hConnectHandle = InternetConnect(hOpenHandle, 
TEXT(" www. server. com"), 
INTERNET INVALID PORT NUMBER, 


hResourceHandle - HttpOpenRequest(hConnectHandle, TEXT("GET"), 
TEXT(" /premium/default. htm"), 
NULL, NULL, NULL, 
INTERNET FLAG KEEP CONNECTION, 0); 


resend: 
HttpSendRequest(hResourceHandle, NULL, 0, NULL, 0); 


// 用 duErrorCode 存储 与 调用 
/ /BttpSendRequest 相关 的 错误 代码 


dwErrorCode = hResourceHandle ? ERROR SUCCESS : GetLastError(); 


dwError = InternetErrorDlg(hwnd, hResourceHandle, dwErrorCode, 
FLAGS ERROR UI FILTER FOR ERRORS | 
FLAGS ERROR UI FLAGS CHANGE OPTIONS | 
FLAGS ERROR UI FLAGS GENERATE DATA, 
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NULL); 


if (dwError -- ERROR INTERNET FORCE RETRY) 
goto resend; 


// 在 此 处 可 以 插入 从 hResourceHandle 读 取 数 据 的 代码 
程序 4.16 用 InternetSetOption 处 理 HTTP 验证 


HINTERNET hOpenHandle,  hResourceHandle, hConnectHandle; 
DWORD dwStatus; 

DWORD dwStatusSize - sizeof(dwStatus); 

char strUsername[64], strPassword[64]; 


/ [i %£ f SL F , hopenHand1e hResourcetandle 和 hConnectHandle 需要 注意 返回 的 顺序 


hOpenHandle = InternetOpen(TEXT("Example"), 
INTERNET OPEN TYPE PRECONFIG, 
NULL, NULL, 0); 
hConnectHandle = InternetConnect(hOpenHandle, 
TEXT(" www. server.com"), 
INTERNET INVALID PORT NUMBER, 
NULL, 
NULL, 
INTERNET SERVICE HTTP, 
0,0); 


hResourceHandle - HttpOpenRequest(hConnectHandle, TEXT("GET"), 
TEXT(" /preniun/default. htm"), 
NULL, NULL, NULL, 
INTERNET FLAG KEEP CONNECTION, 
0); 


resend: 
HttpSendRequest(hResourceHandle, NULL, 0, NULL, 0); 


HttpQueryInfo(hResourceHandle, HTTP QUERY FLAG NUMBER | 
HTTP QUERY STATUS CODE, &dwStatus, &dwStatusSize, NULL); 


switch (dwStatus) 

{ 
//cchUserLength 是 strUsername 的 长 度 
//cchPasswordLength 是 strPassword 的 长 度 
DWORD cchUserLength, cchPasswordLength; 


case HTTP STATUS PROXY AUTH REQ:  // 代 理 服务 器 要 求 身 份 验证 
// 通 过 插入 代码 来 设置 strUsername 和 strPassword 


// 通 过 插入 代码 安全 地 确定 cchUserLength 和 cchPasswordLength 
// 插 入 适当 的 错误 处 理 代码 
InternetSetOption(hResourceHandle, 
INTERNET OPTION PROXY USERNAME, 
strUsername, 
cchUserLength + 1); 
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InternetSetOption(hResourceHandle, 
INTERNET OPTION PROXY PASSWORD, 
strPassword, 
cchPasswordLength + 1); 

goto resend; 

break; 


case HTTP STATUS DENIED: // 服 务 器 需要 验证 
// 通 过 插入 代码 来 设置 strUsername 和 strPassword 


// 通 过 插入 代码 安全 地 确定 cchUserLength 和 cchPasswordLength 


// 插 和 人 适当 的 错误 处 理 代码 
InternetSetOption(hResourceHandle, INTERNET OPTION USERNAME, 


strUÜsername, cchUserLength + 1); 
InternetSetOption(hResourceHandle, INTERNET OPTION PASSWORD, 
strPassword, cchPasswordLength * 1); 
goto resend; 
break; 
) 


// 在 此 处 可 以 插入 从 hResourceandle 读 取 数 据 的 代码 


4.3.4 HTTP URL 编程 


统一 资源 定位 符 (Uniform Resource Locator, URL) ff] — JE 3X Vn FF. 


«URL 的 访问 方式 >://< 主 机 >:< 端 口 >/< 路 径 > 
URL 的 访问 方式 有 HTTP,HTTPS,FTP 等 ,一 主机 二 一 般 用 域名 表示 。 表 4. 5 列 出 
了 常用 的 HTTP URL 编程 函数 。 
表 4.5 常用 的 HTTP URL 编程 函数 


[3 数 功能 描述 
InternetCanonicalizeUrl 将 URL 地 址 规范 化 
InternetCombineUrl 将 一 个 绝对 地 址 和 一 个 相对 地 址 组 合成 一 个 新 的 URL 
InternetCrackUrl 将 一 个 URL 地 址 的 各 部 分 分 解 到 一 个 URL COMPONENTS 结构 中 
InternetCreateUrl 将 URL 地 址 的 各 组 成 部 分 合成 一 个 URL 地 址 
InternetOpenUrl 根据 URL 地 址 打开 FTP R HTTP 资源 并 返回 资源 句柄 


FTP 和 HTTP 服务 器 上 的 资源 可 以 直接 被 InternetOpenUrl, InternetReadFile 和 
InternetFindNextFile 函数 访问 。InternetOpenUrl 负责 为 客户 机 建立 一 个 到 URL 指定 资 
源 的 连接 ,连接 成 功 后 ,如 果 目 标 资源 是 一 个 文件 , 则 使 用 InternetReadFile 可 以 下 载 这 个 
文件 ; 如 果 目 标 资 源 是 一 个 目录 , 则 使 用 InternetFindNextFile 可 以 遍历 这 个 目录 。 

InternetOpenUrl 函数 的 语法 如 下 : 

HINTERNET InternetOpenUrl( 

.In  HINTERNET hInternet, 


.In  LPCTSTR lpszUrl, 
.In  LPCTSTR lpszHeaders, 
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.In DWORD dwHeadersLength, 
.In  DWORD dwFlags, 
.In DWHORD PTR dwContext 

) 


InternetOpenUrl 使 用 的 HINTERNET 句柄 由 InternetOpen 创建 。 
InternetQueryDataA vailable, InternetFindNextFile, InternetReadFile 和 InternetSetFilePointer 这 
些 函数 都 使 用 由 InternetOpenUrl 创建 的 句柄 > 

关于 上 述 函 数 的 编程 方法 ,请 读者 参见 程序 4. 1 和 程序 4. 2。 


4.3.5 获取 HTTP 请 求 的 头 部 信息 


对 于 获取 一 个 HTTP 请 求 的 头 部 信息 ,可 以 使 用 HttpQueryInfo 函数 。 

程序 4. 17 演示 了 HttpQueryInfo 函数 借助 HTTP. QUERY RAW. HEADERS CRLF 常 
量 获 取 HTTP 请 求 的 头 部 信息 的 方法 。 

程序 4.17 用 HttpQueryInfo 获取 HTTP 请 求 的 头 部 信息 


// 使 用 一 个 常量 检索 标题 
BOOL SampleCodeOne(HINTERNET hHttp) 
{ 

LPVOID lpOutBuffer = NULL; 

DWORD dwSize = 0; 


retry: 


// 这 个 调用 将 在 第 一 次 调用 时 失败 
// 因 为 没有 分 配 缓冲 区 
if(!HttpQueryInfo(hHttp,HTTP QUERY RAW HEADERS CRLF, 
(LPVOID)1pOutBuffer, &dwSize, NULL) ) 
{ 
if (GetLastError() == ERROR HTTP HEADER NOT FOUND) 
{ 
// 请 求 头 不 存在 的 错误 处 理 
return TRUE; 
else 
{ 
// 检 查 缓冲 区 不 足 
if (GetLastError() == ERROR INSUFFICIENT BUFFER) 
t 
// 分 配 必 要 的 缓冲 区 
lpOutBuffer = new char[dwSize]; 


// 重 新 调用 
goto retry; 
} 
else 
{ 
// 错 误 处 理 代码 
if (1pOutBuffer) 
{ 
delete [] 1pOutBuffer; 
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return FALSE; 


if (1pOutBuffer) 
{ 

delete [] 1p0utBuffer; 
) 


return TRUE; 


} 
em 4 


L 
2. 
3. 


什么 是 WinInet API 编程 ? 它 与 WinSock API 编程 有 何不 同 ? 
什么 是 HINTERNET 句柄 ? 句柄 的 层次 关系 是 如 何 定义 的 ? 
创建 HINTERNET 根 句 柄 的 函数 是 哪个 ? 创建 二 级 HINTERNET 句柄 的 函数 有 


. WinInet API 提供 的 FTP 操作 函数 有 哪些 ? 简 述 各 种 函数 之 间 的 关系 。 

. WinInet API 提供 的 HTTP 操作 函数 有 哪些 ? 简 述 各 种 函数 之 间 的 关系 。 
. WinInet API 能 进行 服务 器 端 编程 吗 ? 为 什么 ? 

. 简 述 用 FTP 函数 上 传 文件 .下 载 文 件 的 方法 。 

.列举 两 种 从 Internet. 上 读 取 文件 的 方法 。 


MFC Internet 编 程 


WinInet API 提供 了 对 FTP 和 HTTP 的 抽象 和 封装 ,编程 者 即使 不 了 解 WinSock、 
TCP/IP 及 其 他 网 络 协议 的 底层 细节 也 能 高 效 地 开发 网 络 程序 。WinInet API 基于 Win32 
API 接口 开发 网 络 应 用 ,即使 FTP .HTTP 协议 有 所 变化 ,也 可 保持 已 有 程序 的 稳定 性 。 

Visual C++ 提供 了 两 种 使 用 WinInet API 的 模式 ,一 种 是 第 4 章 介 绍 的 直接 调用 Windows 
SDK 的 Win32 编程 模式 ,一 种 是 本 章 介 绍 的 基于 MFC WinInet Classes 的 编程 模式 。 


6.1 MFC Winlnet 概述 
w 

MFC WinInet 采用 面向 对 象 技术 对 WinInet API 进一步 抽象 和 封装 ,使 得 Web 客户 
机 编程 更 为 简洁 高 效 。 

5.1.1 MFC Winlnet 基本 类 


学 习 MFC WinInet 编程 ,首先 要 了 解 、 掌 握 MFC WinInet 基本 类 。 图 3. 1 中 的 
Internet Services,File Services 和 Exceptions 3 个 子 框架 描述 了 MFC WinInet 基本 类 , 现 
将 这 些 类 之 间 的 层次 关系 归纳 整理 为 图 5. 1。 


File Services Internet Services 
[EE [CImtemetSession 太 ] 
Meme CInternetConnection X 
CSEE ] CFtpConnection 
CUSI CGopherConnection 
CStudioFile 
CHttpConnection £ 
=i CilnternetFile*& RES 
CGopherFile CFileFind X 
—[CHtpFile X ] CFtpFileFind xe 
Exceptions CGopherFileFind 
CException 
: _ CGopherLocator 
CArchiveException 
CFileException 
n InternetException X 


图 5.1 MFC Winlnet 基本 类 
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图 5. 1 中 带 友 的 类 为 MFC WinInet 基本 类 ,主要 有 以 下 几 个 : 


CInternetSession 


CInternetConnection 


CFtpConnection 


CHttpConnection 


CInternetFile 
CHttpFile 
CFileFind 
CFtpFileFind 
CInternetException 

由 于 Gopher 协议 基本 过 时 ,所 以 上 面 略 去 了 与 Gopher 相关 的 类 。 下 面 简 单 介绍 
CInternetSession 类 ,对 于 其 他 类 的 用 法 请 参阅 MSDN. 

CInternetSession 的 基本 功能 是 创建 并 初始 化 Internet 会 话 ,也 可 连接 到 代理 服务 器 ， 
其 父 类 是 CObject。 如 果 需 要 在 整个 应 用 中 保持 Internet 连接 ,可 以 为 CWinApp 类 创建 一 
个 CInternetSession WÈ bi. Internet 会 话 一 旦 建立 , 即 可 调用 OpenURL 方法 。 如 果 
OpenURL 打开 的 是 本 地 文件 ,OpenURL 将 返回 一 个 指向 CStdioFile 对 象 的 指针 。 如 果 
OpenURL 在 Internet 服务 器 上 打开 一 个 文件 , 即 可 从 服务 器 上 读 取 信息 。CInternetSession 类 
的 成 员 定义 如 表 5. 1 所 示 。 


表 5.1 ClnternetSession 类 的 成 员 


构造 函数 

CInternetSession 创建 一 个 CInternetSession 对 象 
属性 

EnableStatusCallback 启用 状态 回调 函数 
GetFtpConnection 建立 到 FTP 服务 器 的 连接 并 登录 


GetHttpConnection 建立 到 HTTP 服务 器 的 连接 并 登录 
OpenURL 分 析 并 打开 URL 指定 的 资源 文件 ,返回 一 个 文件 指针 
ServiceTypeFromHandle 返回 Internet 服务 的 类 型 

SetOption 设置 Internet 会 话 选项 

函数 

Close Internet 会 话 退 出 时 关闭 Internet 连接 
GetContext 为 Internet 或 应 用 会 话 获得 上 下 文 的 值 
GetCookie 返回 指定 URL 的 Cookie 及 其 所 有 父 URL 
GetCookieLength 获取 存储 在 缓冲 区 中 的 Cookie 的 长 度 
SetCookie 为 指定 的 URL 设置 Cookie 

重 载 函 数 

OnStatusCallback 当 状 态 回调 有 效 时 ,更 新 操作 状态 
操作 符 

operator HINTERNET 当前 Internet 会 话 的 句柄 
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5.1.2 MFC Winlnet 类 之 间 的 关联 


在 使 用 MFC WinInet 基本 类 进行 客户 机 编程 时 ,需要 注意 某 些 操作 之 间 的 依赖 关系 ， 
下 面 按照 URL 类 操作 、FTP 类 操作 和 HTTP 类 操作 3 个 方面 予以 归纳 ,如 表 5.2 一 表 5.4 
所 示 。 


表 5.2 与 URL 相关 的 一 些 操作 (不 分 FTP 或 HTTP) 


LEE 先行 操作 步骤 
建立 一 个 连接 创建 CInternetSession 对 象 , 这 是 整个 客户 程序 的 基础 
打开 URL 建立 连接 之 后 才能 调用 CInternetSession: :OpenURL 


从 URL 读数 据 打开 URL, 然 后 调用 CInternetFile; :Read 

设置 Internet 选项 ”建立 连接 ,然后 调用 CInternetSession: :SetOption 

重 载 状态 回调 函数 ”建立 连接 ,调用 CInternetSession:: EnableStatusCallback, 然后 重 载 CInternetSession: : 
OnStatusCallback 函数 处 理 调用 


385.3 FTP 客户 机 操作 


操 作 先行 操作 步骤 

建立 FTP 连接 创建 CInternetSession 对 象 作 为 客户 程序 基础 ,调用 CInternetSession: : 
GetFtpConnection 创建 CFtpConnection 连接 对 象 

查找 第 一 个 资源 创建 FTP 连接 ,然后 创建 CFtpFileFind 对 象 , 调用 CFtpFileFind: : 
FindFile 函数 

检索 所 有 资源 找到 第 一 个 资源 ,调用 CFtpFileFind: :FindNextFile 直到 返回 FALSE 

打开 FTP 文件 先 完成 FTP 连接 的 建立 ,然后 调用 CFtpConnection: :OpenFile 创建 一 个 
CInternetFile 对 象 

读 取 FTP 文件 用 读 模式 打开 一 个 FTP 文件 ,然后 调用 CInternetFile: :Read 读 取 数 据 

写 数据 到 FTP 文件 用 写 模 式 打开 一 个 FTP 文件 ,然后 调用 CInternetFile; ; Write 写 人 数据 


在 客户 机 设置 当前 FTP 服务 建立 FTP 连接 ,然后 调用 CFtpConnection: :SetCurrentDirectory 
器 目录 
在 客户 机 获取 当前 FTP 服务 建立 FTP 连接 ,然后 调用 CFtpConnection: :GetCurrentDirectory 
器 目录 


表 5.4 HTTP 客户 机 操作 


操 作 先行 操作 步骤 


建立 HTTP 连接 创建 CInternetSession 对 象 作为 客户 程序 基础 , 调用 CInternetSession:: 
GetHttpConnection 创建 一 个 CHttpConnection 连接 对 象 

打开 HTTP 文件 建立 HTTP 连接 ,然后 调用 CHttpConnection: :OpenRequest 创建 一 个 CHttpFile X 
件 对 象 , 接 下 来 调用 CHttpFile: : AddRequestHeaders 和 CHttpFile: : SendRequest 将 
请 求 提交 到 服务 器 

读 取 HTTP xft 打开 HTTP 文件 ,然后 调用 CInternetFile: :Read 读 取 数 据 

读 取 HTTP 请 求 头 ”建立 HTTP 连接 ,然后 调用 CHttpConnection: : OpenRequest 创建 CHttpFile 对 
象 , 最 后 调用 CHttpFile: :QueryInfo 
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5.1.3 MFC Winlnet 客户 机 编程 步骤 


写 Internet 客户 机 程序 的 一 般 步 骤 如 下 : 

(1) 创建 Internet 会 话 , 用 CInternetSession 类 完成 会 话 对 象 的 创建 。 

(2) 为 了 完成 与 服务 器 的 通信 ,用 CInternetConnection 类 创建 一 个 连接 对 象 。 在 创建 
连接 时 ,需要 根据 客户 应 用 类 型 (FTP 或 HTTP) 使 用 不 同 的 方法 : 

CInternetSession: :GetFtpConnection 

CInternetSession: :GetHttpConnection 

上 述 两 种 方法 只 是 创建 了 连接 对 象 ,还 不 能 在 服务 器 上 打开 文件 进行 读 / 写 操作 。 

(3) 如 果 要 读 / 写 文件 ,必须 用 CInternetFile (或 其 子 类 CHttpFile) 创 建 一 个 文件 实 
fJ. 读 取 数据 的 简便 方法 是 用 CInternetSession:: OpenURL 方法 打开 目标 资源 。 
OpenURL 方法 返回 一 个 CInternetFile 对 象 。CInternetSession: : OpenURL 不 限定 通信 协 
议 ,FTP、HTTP 均 可 。 使 用 CInternetSession: : OpenURL 也 能 打开 本 地 文件 ,只 不 过 返回 
的 文件 句柄 用 CStdioFile 类 型 取代 了 CInternetFile 类 型 。 

(4) 如 果 客 户 机 创建 的 Internet 会 话 不 需要 读 / 写 数据 ,只 是 从 FTP 服务 器 上 删除 一 
个 文件 , 则 不 需要 创建 CInternetFile 文件 对 象 。 

(5) 创建 CInternetFile 文件 对 象 通常 有 两 种 办 法 ,如 果 使 用 CInternetSession: : 
OpenURL 打开 服务 器 连接 , 则 OpenURL 返回 一 个 CStdioFile 文件 句柄 ; 如 果 使 用 
CInternetSession: :GetFtpConnection 或 GetHttpConnection 打开 服务 器 连接 , 则 必须 再 使 
用 CFtpConnection: :OpenFile 或 CHttpConnection: :OpenRequest 打开 文件 ,并 分 别 返回 
CInternetFile 文件 句柄 或 CHttpFile 文件 句柄 。 

总 之 ,采用 OpenURL 或 GetConnection 方法 处 理 客户 机 连接 ,操作 步骤 略 有 不 同 。 下 
面 给 出 的 程序 5.1 一 程序 5. 3 演示 了 客户 机 编程 的 基本 步骤 和 方法 。 为 了 简化 代码 ,这 3 
个 程序 工作 于 控制 台 模式 ,并 且 省 略 了 异常 处 理 。 

程序 5.1 创建 一 个 最 简单 的 浏览 器 


# include <afxinet.h> 


void DisplayPage(LPCTSTR pszURL) 
{ 
CInternetSession session( T("My Session")); 
CStdioFile* pFile = NULL; 
CHAR szBuff[1024]; 
// 在 控制 台 上 打印 Web 页 
pFile = session. OpenURL(pszURL); 
while (pFile—> Read(szBuff, 1024) > 0) 
{ 
printf s(" € 1023s", szBuff); 
) 
delete pFile; 
session.Close(); 
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程序 5.2 用 HTTP 下 载 一 个 Web 页 面 并 显示 
// 这 段 代 码 还 演示 try/catch 异常 处 理 


# include < afxinet. h> 


void DisplayHttpPage(LPCTSTR pszServerName, LPCTSTR pszFileName) 
( 
CInternetSession session( T("My Session")); 
CHttpConnection * pServer - NULL; 
CHttpFile* pFile - NULL; 
try 
t 
CString strServerName; 
INTERNET_PORT nPort = 80; 
DWORD dwRet = 0; 


pServer = session.GetHttpConnection(pszServerName, nPort); 

pFile = pServer -> OpenRequest(CHttpConnection::HTTP VERB GET, pszFileName); 
pFile -> SendRequest(); 

pFile -> QueryInfoStatusCode(dwRet) ; 


if (dwRet == HTTP STATUS OK) 
{ 
CHAR szBuff[1024]; 
while (pFile-> Read(szBuff, 1024) > 0) 
{ 
printf_s(" % 1023s", szBuff); 


} 
delete pFile; 
delete pServer; 
} 
catch (CInternetException * pEx) 
{ 
// 从 WinInet 捕捉 错误 
TCHAR pszError[64]; 
pEx — > GetErrorMessage(pszError, 64); 
.tprintf s( T("$ 63s"), pszError); 
) 
session. Close(); 


) 
程序 5.3 用 FTP 下 载 一 个 文件 


# include < afxinet.h> 


void GetFtpFile(LPCTSTR pszServerName, LPCTSTR pszRemoteFile, LPCTSTR pszLocalFile) 
( 

CInternetSession session( T("My FTP Session")); 

CFtpConnection * pConn = NULL; 


pConn = session.GetFtpConnection(pszServerName); 


) 
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// 获 取 文 件 
if (!pConn - > GetFile(pszRemoteFile, pszLocalFile)) 
t 
// 显 示 错 误 
) 
delete pConn; 


session. Close(); 


5.1.4 MFC Winlnet 经 典 编程 模型 


MFC WinInet 主要 用 于 Internet 客户 机 编程 ,在 编写 一 般 的 Internet 客户 程序 一般 的 
FTP 客户 程序 一般 的 HTTP 客户 程序 方面 都 有 规律 可 循 , 现 将 这 3 个 方面 的 编程 方法 归 
纳 为 表 5.5 一 表 5.7, 可 以 将 它们 视 作 MFC WinInet 的 经 典 编程 模型 。 


表 5.5 Internet 客户 机 经 典 编程 步骤 


步骤 目标 编程 方法 执行 结果 
1 ”开始 会 话 创建 CInternetSession 对 象 。” 建立 到 服务 器 的 会 话 对 象 
2 ”设置 选项 CInternetSession: :SetOption ”如 果 不 成 功 返 回 FALSE 
3 ”启用 回调 函数 监 CInternetSession:: 重 载 回调 函数 CInternetSession: :OnStatusCallback 
视 会 话 状 态 EnableStatusCallback 实现 用 户 逻 辑 
4 ”连接 到 目标 资源 CInternetSession: :OpenURL OpenURL 返回 一 个 文件 句柄 指向 目标 资源 
5 ” 读 取 文件 CInternetFile: : Read 根据 缓冲 区 大 小 每 次 读 取 指 定 字 节 数 的 数据 
6 ”处 理 异 常 CInternetException 处 理 各 种 Internet 异常 
7 ”结束 会 话 释放 CInternetSession 对 象 自动 清除 打开 的 文件 句柄 和 连接 ,释放 资源 
表 5.6 FTP 客户 机 经 典 编程 步骤 
步骤 目标 编程 方法 执行 结果 
1 ”开始 FTP 会话 创建 CInternetSession 对 象 建立 到 服务 器 的 会 话 对 象 


连接 到 FTP 服务 器 CInternetSession: : GetFtpConnection 返回 CFtpConnection 对 象 

设置 FTP 服务 器 CFtpConnection: :SetCurrentDirectory. 变更 服务 器 的 当前 目录 

的 当前 目录 

找到 目录 中 的 第 一 CFtpFileFind: :FindFile 找到 目录 中 的 第 一 个 文件 或 子 目 

Fra 录 , 如 果 目 录 为 空 则 返回 FALSE 

找到 下 一 个 文件 CFtpFileFind: :FindNextFile 找到 下 一 个 文件 或 子 目 录 , 如 果 
没有 下 一 个 则 返回 FALSE 

打开 文件 CFtpConnection:: OpenFile， 文 件 名 由 打开 FindFile 或 FindNextFile 找 

FindFile 或 FindNextFile 返回 到 的 文件 以 准备 读 / 写 , 返 回 一 个 

CInternetFile 对 象 


读 / 写 文件 CInternetFile: :Read 和 CInternetFile: :Write 借助 一 个 缓冲 区 ,每 次 向 文件 读 / 
写 指定 字 节 数 的 数据 
处 理 异常 CInternetException 处 理 各 种 Internet 异常 


结束 FTP 会 话 释放 CInternetSession 对 象 自动 清除 打开 的 文件 句柄 和 连 


接 ,释放 资源 
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表 5.7 HTTP 客户 机 经 典 编程 步骤 


步骤 H 标 


编程 方法 


执行 结果 


1 ”开始 会 话 

2 ”连接 到 HTTP 服务 器 
3 ”打开 HTTP 请 求 

4 RŽ HTTP 请 求 


创建 CInternetSession 对 象 
CInternetSession: :GetHttpConnection 
CHttpConnection: :OpenRequest 
CHttpFile: :AddRequestHeaders 和 


建立 到 服务 器 的 会 话 对 象 

返回 CHttpConnection 对 象 

返回 CHttpFile 对 象 

请 求 被 发 送 到 服务 器 寻找 文件 ,如 


CHttpFile: :SendRequest 果 没 有 找到 文件 返回 FALSE 


5 ERX CHttpFile 借助 一 个 缓冲 区 ,每 次 从 文件 读 取 
指定 字 节 数 的 数据 

6 ”处 理 异常 CInternetException 处 理 各 种 Internet 异常 

7 ”结束 HTTP 会 话 释放 CInternetSession 对 象 自动 清除 打开 的 文件 句柄 和 连接 ， 
释放 资源 


6.2 简易 FTP 客户 机 编程 实例 
E 


FTP 是 TCP/IP 网 络 上 的 两 台 计 算 机 之 间 传 送 文件 的 协议 , 它 是 Internet 上 最 早 使 用 
的 协议 之 一 。FTP 客户 机 编程 是 指 设计 能 够 与 FTP 服务 器 交换 文件 的 客户 端 程序 。 


FTP 客户 机 /服务 器 模型 


FTP 客户 机 /服务 器 的 工作 模型 如 图 5. 2 所 示 。 客 户 机 连接 服务 器 后 建立 两 个 传输 信 
道 : 一 个 是 控制 信道 ,用 来 交换 命令 信息 ; 另 一 个 是 数据 信道 ,用 来 交换 数据 信息 。 客 户 机 
和 服务 器 都 有 两 个 模块 分 别 用 来 处 理 这 两 类 信息 ,一 个 模块 称 作 DTP (Data. Transfer 
Process) , 另 一 个 模块 称 作 PI (Protocol Interpreter) 。 


5.2.1 


Server Client 
GUI e 
用 户 

Control Channel 
PI Response PI 
Server Client 
Commands 
File System File System 


图 5.2 FTP 客户 机 /服务 器 工作 模型 
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CD DTP 模块 负责 管理 数据 交换 信道 ,服务 器 端的 DTP 称 作 SERVER-DTP, 客 户 机 
端的 DTP 称 作 USER-DTP。 

(2) PI 模块 负责 在 控制 信道 间 交 换 FTP 命令 和 控制 数据 信道 ,服务 器 端 和 客户 机 端的 
PI 工 作 模式 不 同 : SERVER-PI 负责 侦 听 来 自 USER-PI 的 命令 ,建立 与 客户 机 的 连接 ,发 
送 响 应 给 客户 机 并 控制 SERVER-DTP 的 和 运行。 而 USER-PI 负责 建立 到 FTP 服务 器 的 连 
接 , 发 送 FTP 命令 ,接收 来 自 SERVER-PI 的 响应 并 控制 USER-DTP 的 运行 。 

关于 FTP 的 命令 和 响应 请 参见 RFC 959, 正 如 本 章 一 开始 指出 的 那样 ,用 MFC 
WinInet 类 编写 Internet 程序 ,即便 不 了 解 协议 内 容 , 也 可 以 做 出 漂亮 的 网 络 程序 ,这 些 
MFC 类 封装 了 协议 细节 ,使 编程 者 可 以 更 好 地 关注 业务 逻辑 的 设计 。 


5.2.2 功能 定义 与 技术 要 点 


有 很 多 功能 强大 的 FTP 客户 机 (如 CuteFTP、 免 费 开 源 的 FileZilla 等 ) 广 泛 应 用 于 互 
联网 和 企业 内 部 网 。 本 节 设 计 完成 的 简易 FTP 客户 机 ,其 内 含 的 FTP 协议 模型 和 操作 原 
理 与 CuteFTP, FileZilla 等 是 一 致 的 。 该 程序 的 初始 运行 界面 如 图 5.3 所 示 。 客 户 机 可 以 
选择 登录 的 FTP 服务 器 ,使 用 的 登录 名 和 密码 。 一 旦 与 服务 器 建立 连接 , 即 显 示 服 务 器 当 
前 目录 列表 ,列表 包括 文件 名 、 修 改 日 期 和 大 小 。 实 现 的 操作 包括 进入 子 目 录 、 返 回 上 一 级 
目录 、 重 命名 文件 .删除 文件 、 上 传 文件 和 下 载 文 件 等 。 


* Ftp P! Bl 


FTP 服 务 器 主机 各 : | 127.0.0.1 用 户 各 :|anonymous| $3: 


服务 器 文件 目录 : 
文件 各 修改 日 期 大 小 


5.3 简易 FTP 客户 机 运行 初始 界面 


简易 FTP 客户 机 设计 与 实现 的 技术 要 点 如 下 : 

(1) 如 何 用 VS2010 创建 MFC Win32 项 目 。 

(2) 如 何 创建 一 个 Internet 会 话 , 即 创建 CInternetSession 对 象 。 

(3) 如 何 建立 与 FTP 服务 器 的 连接 , 即 创建 CFtpConnection 对 象 。 

(4) 登录 成 功 后 ,如 何 检索 当前 目录 下 的 文件 和 子 目录 并 显示 文件 信息 。 
(5) 如 何 进入 和 退出 子 目 录 并 显示 子 目录 文件 列表 。 

(6) 如 何 重 命名 文件 和 删除 文件 。 

(7) 如 何 上 传 文件 和 下 载 文件 。 
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5.2.3 FTP 服务 器 的 搭建 


为 了 配合 简易 FTP 客户 机 的 功能 测试 ,需要 先 搭建 一 个 FTP 服务 器 。FTP 服务 器 软 
件 有 很 多 ,知名 的 有 Serv-U ,免费 开源 的 FileZilla Server 等 。FileZilla Server 是 一 款 非常 
轻 量 级 的 FTP 服务 器 软件 ,架设 FTP 服务 器 步骤 简单 , 且 功 能 全 面 ,本 节 实 例 使 用 
FileZilla Server 搭建 FTP 服务 器 ,搭建 步骤 如 下 。 


1. 下 载 FileZilla Server 软件 


读者 自行 登录 FileZilla 官方 网 站 (网 址 为 https://filezilla-project. org/) ,在 其 首页 上 
可 以 看 到 FileZilla 客户 机 和 服务 器 的 下 载 链接 ,选择 Windows 版 的 FileZilla Server 下 载 。 
这 里 下 载 的 是 截止 到 2013 年 8 月 的 最 新 版 ,服务 器 版 本 号 为 0. 9. 41 ,文件 名 是 FileZilla _ 
Server-0_9_41. exe, 文 件 大 小 只 有 1. 54MB。 


2. 安装 FileZilla Server 


双击 运行 FileZilla Server-0 9 41. exe 程序 ,开始 安装 进程 。 第 一 步 同意 软件 协议 ; 第 
二 步 选 择 安装 类 型 为 标准 安装 ; 第 三 步 设置 软件 安装 位 置 ,在 此 不 用 修改 ,直接 采用 默认 
值 ; 第 四 步 设置 服务 器 启动 类 型 ,选择 手动 方式 ,同时 指定 服务 器 管理 程序 使 用 的 端口 , 原 
值 为 14147 ,不 用 修改 ; 第 五 步 设置 服务 器 界面 的 启动 方式 ,保留 默认 值 不 用 修改 。 做 完 上 
述 配置 后 , 单 击 Install 按钮 开始 安装 ,安装 完成 后 ,关闭 提示 框 。FileZilla Server 的 初次 启 
动 界面 如 图 5.4 所 示 。 


-FileZilla Server 


D bytes received 0 B/s 


5.4 FileZilla Server 的 初次 启动 界面 


3. 配置 FileZilla Server 服务 器 


如 图 5.4 所 示 , 选 择 Always connect to this server 复 选 框 , 设 定 管理 员 密 码 , 例 如 
“123456”, 然 后 单 击 OK 按钮 ,在 工作 区 中 会 显示 以 下 信息 : 
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Ë 


Connecting to server... 
Connected, waiting for authentication 
Logged on 


选择 Edit >Settings 命令 ,可 以 在 弹出 的 对 话 框 中 进一步 配置 服务 器 的 工作 参数 ,如 
图 5.5 所 示 。 


FileZilla Server Options 


Welcome mes: 
IP bindings Connecton settngs 
List of ports between 1 
Pre Lsten on these ports: and 65535. 
Passive mode sett 
Securty settings Max. number of users: (0 for unimited users) 
Macelanecus 
Admin terface se Performance setings 
Loggng This value should be a multiple of the. 
GSS Settings Marber of Tirends number of processors installed on your 
Speed Units system. Increase this value if your server 
Flerender compre is under heavy load. 
SSL/TLS settings Z 


L > 


in seconds (1-9999, 0 for no timeout). 
in seconds (600-9999, 0 for no timeout). 
This value specifies the time a user has to 
initiate a file transfer. 

in seconds (1-9999, 0 for no timeout). 
This value specfies the time in which a 
new user has to login. 


图 5.5 配置 FileZilla Server 服务 器 的 工作 参数 


4. 创建 新 用 户 


选择 Edit — Users 命令 ,弹出 配置 用 户 对 话 框 ,创建 一 个 服务 器 新 用 户 ,用 户 名 为 
“dxz”\ 密 码 为 “123”, 配 置 界面 如 图 5.6 所 示 。 


图 5.6 创建 并 配置 新 用 户 
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5. 配置 共享 文件 夹 和 访问 权限 


在 图 5.6 中 单 击 左 侧 的 Shared folders 选项 切换 到 共享 文件 夹 配置 界面 , 设 定 共享 文 
件 夹 ,此 处 指定 “E:\ 网 络 编程 ”, 并 设置 为 Home 目录 ,然后 为 dxz 用 户 选择 文件 操作 权限 
和 目录 操作 权限 ,如 图 5.7 所 示 。 单 击 OK 按钮 ,至 此 ,服务 器 配置 及 用 户 配置 工作 全 部 完 
成 。 待 后 面 的 简易 FTP 客户 机 程序 完成 之 后 ,登录 本 服务 器 进行 联合 测试 即 可 。 


A directory alas wë aiso appear at the specfied locaton. Alases must 
path Seperste mapie sisses for one drectoy weh tre ppe character (1) 
F usnç alases, please avoid cycic drectory stuctures. t wil orly corfuse FTP certs. 


图 5.7 设置 共享 文件 夹 和 用 户 访问 权限 


6. 解决 中 文 乱码 问题 


FileZilla Server 用 的 是 UTF-8 编码 ,Windows 系统 一 般 采 用 GBK, 所 以 用 非 FileZilla 
Client 登录 服务 器 会 出 现 中文 乱 码 。 解 决 办 法 是 从 网 上 下 载 Tommy 的 补丁 FileZillaPV， 
注意 对 照 服务 器 版 本 下 载 。 下 载 补丁 后 , 停 掉 服务 器 ,覆盖 安装 目录 中 的 FileZilla server. 
exe, 再 重启 服务 器 即 可 。 


5.2.4 简易 FTP 客户 机 的 创建 步骤 


简易 FTP 客户 机 的 创建 步骤 与 之 前 的 MFC 程序 类 似 , 编 程 环境 使 用 VC++ 2010, 创 建 
客户 机 的 步骤 如 下 。 


1. 使 用 MFC 应 用 程序 向 导 创 建 客户 机 程序 框架 


CD 启动 VS2010 ,选择 “文件 ~ 新 建 一 项 目 ” 命 令 ,弹出 “新建 项 目 ” 对 话 框 , 设 定 模板 为 
MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名称 、 解 决 方案 名 称 为 FtpClient, 并 指定 项 目 保存 
位 置 ,然后 单 击 “ 确 定 ” 按 钮 ,进入 MEC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 的 第 一 步 ,将 应 用 程序 类 型 设 定 为 “基于 对 话 框 ”。 

(3) 在 MFC 应 用 程序 向 导 的 第 二 步 , 设 置 用 户 界面 选项 ,在 此 保留 默认 选项 。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 ,设置 高 级 功能 ,在 此 保留 默认 选项 。 

(5) 在 MFC 应 用 程序 向 导 的 最 后 一 步 ,观察 生成 的 类 CFtpClientApp 和 CFtpClientDlg。 
然后 单 击 “ 完 成 ”按钮 ,完成 应 用 程序 框架 的 创建 ,生成 FtpClient 项 目 解决 方案 ,如 图 5. 8 
所 示 。 


2. 添加 包含 语句 
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在 FtpClientDlg. h 文件 的 首部 添加 包含 语句 “#include "Afxinet. h"”, 以 获得 对 MFC 


WinInet 类 的 编程 支持 。 


3. 为 客户 机 对 话 框 添加 控件 .构建 程序 主 界面 


在 资源 视图 中 展开 Dialog 资源 条 目 ,然后 双击 IDD_FTPCLIENT_DIALOG ,在 工作 区 
会 出 现 一 个 对 话 框 ,借助 工具 箱 中 的 控件 ,将 程序 主 界面 设计 成 如 图 5.9 所 示 的 布局 。 


解决 方案 资源 管理 器 ”9? x 
l 


EC 
= TFtpClient 


a 名 外 部 依赖 项 
s 名 藉 文件 
M FtpClient.h 
B FtpClientDlg.h 
国 NesNameD] g. h 
i Resource. h 
El resource. hm 
国 stdafx.h 
国 targetver.h 
s > 源 文件 
MFtpClient. cpp 
他 FtpClientDlg. cpp 
3 NewNameDl g. cpp 
€) stdafx. cpp 
*» aAA 
Ø Readlle. txt 


图 5.8 FTP 客 户 机 项 目 解决 方案 


FIPBSBisE: TOMANID 


| P£: TARWE “ms: TARNE 


服务 器 文件 目录 : 


图 5.9 FTP 客户 机 主 对 话 框 界面 


图 5.9 中 各 控件 的 定义 如 表 5. 8 所 示 。 
表 5.8 FIP 客户 机 程序 主 对 话 框 中 控件 的 属性 


控件 ID 控件 标题 控件 类 型 
IDC_EDIT_SERVERNAME 无 编辑 框 Edit Control 
IDC_EDIT_USERNAME 无 编辑 框 Edit Control 
IDC_EDIT_PASSWORD 无 编辑 框 Edit Control 
IDC_LIST_DIRECTORY 无 列表 框 MFC CListCtrl 
IDC_BUTTON_LOGIN 登录 按钮 Button Control 
IDC_BUTTON_LOGOUT 退出 按钮 Button Control 
IDC_BUTTON_UPLOAD 上 传 文件 按钮 Button Control 
IDC_BUTTON_DOWNLOAD 下 载 文件 按钮 Button Control 
IDC_BUTTON_RENAME 重 命名 按钮 Button Control 
IDC_BUTTON_QUERY 文件 查询 按钮 Button Control 
IDC_BUTTON_DELETE 删除 文件 按钮 Button Control 
IDC_BUTTON_SUBDIR 进入 子 目录 按钮 Button Control 
IDC BUTTON PARENTDIR 进入 父 目录 按钮 Button Control 
IDC_STATIC1 FTP 服务 器 主机 名 : 静态 文本 Static Text 
IDC_STATIC2 用 户 名 : 静态 文本 Static Text 
IDC_STATIC3 密码 : 静态 文本 Static Text 
IDC_STATIC4 服务 器 文件 目录 : 静态 文本 Static Text 
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4. 为 对 话 框 中 的 控件 对 象 定义 相应 的 成 员 变量 
用 MFC 类 向 导 为 表 5. 9 中 的 控件 定义 成 员 变量 。 


表 5.9 FTP 客户 机 程序 主 对 话 框 中 控件 的 成 员 变 量 


控件 ID 对 应 成 员 变量 名 称 变量 类 型 
IDC EDIT SERVERNAME m strServerName CString 
IDC EDIT USERNAME m strUserName CString 
IDC EDIT PASSWORD m strPassword CString 
IDC LIST DIRECTORY m listDirectory CListCtrl 


5. 为 对 话 框 类 CFtpClientDlg 中 的 控件 添加 事件 响应 处 理 函 数 


函数 定义 参见 表 5. 10。 


表 5.10 FTP 客户 机 程序 主 对 话 框 中 按钮 控件 的 事件 响应 函数 


控件 ID 消 息 成 员 函 数 (响应 函数 ) 
IDC_BUTTON_LOGIN BN_CLICKED OnClickedButtonLogin 
IDC BUTTON LOGOUT BN CLICKED OnClickedButtonLogout 
IDC BUTTON UPLOAD BN CLICKED OnBnClickedButtonUpload 
IDC BUTTON DOWNLOAD BN CLICKED OnBnClickedButtonDownload 
IDC BUTTON RENAME BN CLICKED OnBnClickedButtonRename 
IDC BUTTON QUERY BN CLICKED OnBnClickedButtonQuery 
IDC BUTTON DELETE BN CLICKED ClickedButtonDelete 
IDC BUTTON SUBDIR BN CLICKED OnBnClickedButtonSubdir 
IDC BUTTON PARENTDIR BN CLICKED OnBnClickedButtonParentdir 


上 述 操作 仍 用 MFC 类 向 导 辅 助 完成 。 


6. 添加 一 个 对 话 框 类 CNewNameDlg, 用 于 更 改 文件 名 


在 资源 视图 中 设计 一 个 改名 的 对 话 框 ,然后 用 MFC 添加 类 向 导 完 成 CNewNameDlg 


7. 为 CFtpClientDlg 类 添加 成 员 变量 初始 化 代码 


在 CFtpClientDlg 类 的 构造 函数 中 添加 成 员 变 量 的 初始 化 代码 , 设 定 服务 器 名 、 用 户 名 


和 密码 的 初始 值 : 
m strServerName = _T("127.0.0.1"); 
m_strUserName =  T("anonymous"); 
m strPassword = T(""); 


m pFTPSession - NULL; 
m pConnection - NULL; 
m pFileFind - NULL; 


第 5 章 MFC Internet 编 程 VA 


8. 为 CFtpClientDlg 类 添加 成 员 函 数 
借助 MFC 类 向 导 为 CFtpClientDlg 类 添加 成 员 函 数 : 


// 遍 历 目录 

void DisplayContent(LPCTSTR lpctstr,CString currentDir = _T("/")); 
void Download(void); // FACE 

void Upload(void); // 上 传 文件 

void Rename(void); // 文 件 改名 

void DeleteFile(void); // 删 除 文 件 

void DisplaySubDir(void); // 显 示 子 目录 

CString GetParentDirectory(CString str); // 返 回 父 目录 

void DisplayParentDir(void); // 显 示 父 目录 

// 连 接 服务 器 


BOOL Connect(CString serverName, CString userName, CString password); 


9. 添加 事件 函数 和 成 员 函 数 业务 逻辑 代码 


在 NewNameDlg. cpp 中 完善 CNewNameDlg 的 成 员 函 数 代 码 , 在 FtpClientDlg. cpp 中 
完善 CFtpClientDlg 的 事件 处 理 函数 和 成 员 函 数 代码 。 


5.2.5 主要 代码 


对 于 简易 FTP 客户 机 程序 的 文件 清单 ,请 读者 从 清华 大 学 出 版 社 的 教学 服务 资源 网 上 
下 载 。 下 面 给 出 上 传 .下载 \ 遍 历 目录 这 3 个 典型 模块 的 实现 代码 。 
程序 5.4 遍历 目录 


// 显 示 服 务 器 当前 目录 下 的 所 有 文件 与 子 目录 
void CFtpClientDlg: :DisplayContent (LPCTSTR lpctstr,CString currentDir) 
{ 
UpdateData(TRUE) ; 
Connect(m strServerName,m strUserName,m strPassword); 
m pConnection - > SetCurrentDirectory(currentDir); 
m listDirectory.DeleteAllItems(); 
m pFileFind- new CFtpFileFind(m pConnection); 
BOOL bFound; 
bFound- m pFileFind— > FindFile(lpctstr); 
if (!bFound) 
( 
m pFileFind-» Close(); 
m pFileFind = NULL; 
AfxMessageBox(_T(" 没 有 找到 文件 !"),MB_OK | MB ICONSTOP); 
return; 


} 
CString strFileName; 
CString strFileTime; 


CString strFileLength; 


while(bFound) 


248 


N 


Windows 网 络 编程 案例 教程 


bFound- m pFileFind—>FindNextFile(); 


strFileName = m pFileFind- > GetFileName(); 
FILETIME ft; 
m_pFileFind -> GetLastWriteTime(&ft); 
CTime FileTime(ft); 
strFileTime = FileTime.Format(" % y- %m- &d"); 
if (m_pFileFind -> IsDirectory()) 
( 
// 如 果 是 目录 用 < 子 目录 > 代替 
strFileLength = "< 子 目录 >"; 
} 
else 
{ 
// 得 到 文件 大 小 
ULONGLONG fileSize = m pFileFind -> GetLength(); 


if (fileSize< 1024) 
{ 
strFileLength.Format( T(" $ d Bytes"), fileSize); 
) 
else if (fileSize-«(1024 * 1024)) 
{ 
strFileLength.Format( T(" $3.3f KB"),fileSize/1024.0); 
Jelse if (fileSize «(1024 * 1024 * 1024)) 
{ 
strFileLength. Format(_T(" % 3.3f MB"), fileSize/(1024 * 1024.0)); 
}else 
{ 
strFileLength. Format(_T(" % 1.3f GB"), 
fileSize/(1024.0 * 1024 * 1024) ) ; 
}// 结 束 if fileSize 
}// 结 束 if 
int column = 0; 
m listDirectory. InsertItem(column, strFileName, 0); 
m listDirectory.SetItemText(column, 1, strFileTime); 
m listDirectory. SetItemText(column, 2, strFileLength); 
column** ; 
}// 结 束 while 
UpdateData( FALSE); 
} 


程序 5.5 下 载 文件 


void CFtpClientDlg: :Download(void) 

t 

int index = m listDirectory.GetNextltem( — 1,LVNI SELECTED); 
if (index-- - 1) 

{ 


AfxMessageBox(_T(" 请 首先 选择 要 下 载 的 文件 !"),MB_OK | MB ICONQUESTION); 
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else 


// 得 到 选择 项 的 类 型 

CString strType = m listDirectory. GetItemText( index, 2); 
证 (strType!= "< 子 目 录 >") // 选 择 的 是 文件 
t 

CString strDestName; 

CString strSourceName; 

// 得 到 所 要 下 载 的 文件 名 


strSourceName = m_listDirectory. GetItemText( index, 0); 


CFileDialog dlg(FALSE, _T(""), strSourceName) ; 
if (dlg. DoModal() == IDOK) 
{ 
// 获 得 下 载 文件 在 本 地 机 上 存储 的 路 径 和 名 称 
strDestName = dlg.GetPathName(); 
// 调 用 CFtpConnect 类 中 的 GetFile 函数 下 载 文件 
if (m pConnection- > GetFile(strSourceName, strDestName) ) 
AfxMessageBox( T(" F 3)8,3/ 1"), MB OK|MB ICONINFORMATION); 
else 
AfxMessageBox( T(" F #ü & g! "),MB OK|MB ICONSTOP); 


i 
else 
{ 
// 选 择 的 是 目录 
RfxMessageBox(_T(" 不 能 下 载 目录 !\n 请 重 选 !"),MB_OK|MB_ICONSTOP) ; 


) 
) 


程序 5.6 上 传 文件 


void CFtpClientDlg: :Upload(void) 

( 

CString strSourceName; 

CString strDestName; 

CFileDialog dlg(TRUE, T(""), T("*. *")); 

if (dlg. DoModal() == IDOK) 

( 
// 获 得 待 上 传 的 本 地 文件 路 径 和 文件 名 
strSourceName = dlg.GetPathName(); 
strDestName - dlg.GetFileName(); 


// 调 用 CFtpConnect 类 中 的 PutFile 函数 上 传 文件 
if (m pConnection -> PutFile(strSourceName, strDestName)) 
AfxMessageBox( T(" F f£ WI)" ), MB OK|MB ICONINFORMATION); 
else 
AfxMessageBox( T(" F fẸ K Wr"), MB OK|MB ICONSTOP); 
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DisplayContent( T("* ")); 
) 
创建 完成 简易 FTP 客户 机 项 目 之 后 ,编译 运行 的 初始 界面 如 图 5. 3 所 示 。 


5.2.6 系统 测试 


将 前 面 创建 的 简易 FTP 客户 机 与 服务 器 做 联合 测试 ,测试 步骤 如 下 : 

(1) 启动 FileZilla Server。 

(2) 运行 简易 FTP 客户 机 ,初始 界面 如 图 5. 3 所 示 。 

(3) 登录 FileZilla Server。 

服务 器 地 址 不 用 修改 ,将 用 户 名 改 为 “dxz”, 将 密码 改 为 *123”, 然 后 单 击 “ 登 录 ” 按 钮 ,成 
功 登 录 后 的 界面 如 图 5. 10 所 示 ,列表 框 中 显示 了 根 目录 下 所 有 的 文件 和 子 目 录 。 


* Ftp P Jl 


FTP 服 务 器 主机 名 : | 
服务 器 文件 目录 : 


文件 名 
计算 机 五 子 棋 博 奕 系 轿 的 碘 充 与 实 … 
idi 


网 络 编程 职业 规划 .doc 
网 络 编程 基础 ,docx 
Fita fi zo 


Fate 
LELTLa kL coc 
简单 邮件 收发 系统 的 设计 与 实现 .doc 
iot. ppt 
$599 Fan 43.doc 
Mott Fah +iK2.docx 
999 Fia TX. doo 
pt 


3559 opt 10-07-09 1.006MB V 
< > 


图 5.10 登录 FTP 服务 器 后 的 初始 界面 
Cb 进行 各 项 测试 ,如 上 传 . 下 载 . 删 除 .改名 等 ,此 处 不 再 一 一 演示 。 


6.3 HTTP 浏览 器 编程 实例 


WWW 编程 (Web 编程 ) 一 般 指 服务 器 端的 开发 工作 ,因为 客户 端 只 需要 一 个 浏览 器 就 
足够 了 。 与 Web 服务 器 编程 相关 的 技术 一 般 单独 归 为 Web 编程 系列 ,本 书 不 做 讨论 。 证 
明 MFC 功能 强大 的 另 一 个 经 典 例子 是 设计 浏览 器 ,这 是 本 节 的 主题 。 


5.3.1 浏览 器 /服务 器 工作 模型 


Web 客户 机 与 Web 服务 器 通信 采用 HTTP 协议 ,由 RFC 2616 定义 的 HTTP/1. 1 版 
协议 ,在 互联 网 上 得 到 了 广泛 的 应 用 。HTTP 使 用 底层 TCP/IP 协议 建立 到 服务 器 的 连 
接 ,工作 原理 如 图 5. 11 所 示 。 在 此 以 客户 机 访问 网 易 首 页 为 例 ,其 大 致 要 经 历 以 下 7 个 
步骤 : 

(1) 用 户 在 浏览 器 中 输入 一 个 网 址 ,例如 “http://www. 163. com". 
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DNS 
Server 
202.102.152.3 


px & O 


Resources 


um 
Protocol š 


www.163.con 
DNS Reply: 
123.129.254.18 


DNS Query: 


LHTTP Request 


GET/ 
2.HTTP Response 
200 OK I 
<HTML>…</HTML> Q 


www. 163.con 
3.HTTP Request Web Server 
POST 


4Q 


图 5.11 B/S 模式 工作 模型 


(2) Web 浏览 器 通过 查询 DNS 服务 器 获得 www. 163. com 的 全 地 址 ,例如 123. 129. 254. 18。 

(3) Web 浏览 器 建立 到 123. 129. 254. 18:80 服务 器 的 TCP/IP 连接 。 

(4) 成 功 建立 TCP/IP 连接 后 ,浏览 器 使 用 HTTP 协议 发 送 HTTP 请 求 。 

这 里 对 HTTP 协议 的 请 求 头 和 响应 头 分 别 做 一 下 简单 分 析 。 用 HttpAnalyzerFull_V7 
工具 捕获 的 访问 www. 163. com 网 站 首页 的 HTTP 请 求 头 的 结构 如 图 5. 12 Bros ,图 中 省 
略 了 Cookie 太 长 的 部 分 。 


[Request Headers. Value. 

(Request-Line) GET [special 0077jtjerror. isp.htl 
HTTP/L1 

Host www. 163.com 

Connection Keep-Alive 

Cookie 


_ntes_nnid=dced09962f298a595dc 
3403a 19b2ef, 1377908395312; 
图 5.12 访问 www. 163. com ff] HTTP 请 求 头 


第 1 行 包含 GET 命令 指定 的 访问 方式 和 使 用 的 HTTP 协议 及 版 本 号 1.1.58 2 行 到 
第 4 行 指定 主机 名 .连接 方式 和 Cookie; 

(5) 服务 器 响应 客户 机 。 

捕获 的 响应 头 结构 如 图 5. 13 所 示 。 

第 1 行 表示 响应 状态 行 , Web 服务 器 回 送 一 个 HTTP 响应 码 , 这 里 的 200 表示 接受 请 
求 ,响应 成 功 。 其 他 一 些 HTTP 响应 码 ,例如 404 表示 请 求 的 文件 没有 找到 ,403 表示 禁止 
访问 。 第 2 行 往 后 指定 回 送 的 内 容 类 型 时间、 服务 器 等 信息 。 响 应 头 后 面 紧 跟 响 应 的 
HTML 文件 内 容 。 

(6) 数据 传输 。 响 应 的 内 容 跨 越 互联 网 通过 IP 寻 址 到 达 客 户 机 ,浏览 器 的 任务 就 是 解 
析 收 到 的 HTML 文档 并 显示 。 

(7) 断 开 与 服务 器 的 连接 。HTTP 协议 是 一 种 无 状态 协议 ,所谓 无 状态 协议 ,就 是 客户 
机 连接 到 服务 器 后 发 送 一 个 请 求 , 获 得 一 个 响应 ,然后 立即 断 开 与 服务 器 的 连接 。 


252, Windows 网 络 编程 案例 教程 
Nw 


为 了 提高 会 话 效率 ,HTTP/1. 1 一 般 在 HTTP 请 求 的 头 部 设 定 连接 类 型 为 keep-alive， 
这 样 下 一 个 HTTP 请 求 就 不 用 重新 建立 TCP/IP 连接 了 ,可 以 直接 发 送 。 

图 5.14 给 出 的 是 用 HttpAnalyzerFull. V7 工具 捕获 的 访问 www. microsoft. com 的 
HTTP 请 求 头 和 响应 头 的 结构 信息 。 


Request Headers Value 


(Request-Line] GET /HTTP/1.1 
Host www.microsoft.com 
Cookie WT_NVR=0=/:1=zh-n|en-us:2=z 
Imsj/archive; 
IR—— vue MC1=V=48GUID=ec7d0e6b61888c 
[Status-Line) HTTP/1.1200 OK Response Headers Value 
Expires Sat, 31 Aug 2013 01:12:31 GMT [Status-Line) HTTP/1.1 200 OK 
Date Sat, 31 Aug 201301:10:31 GMT Cache-Control no-cache 
Server nginx Content-Type text/html 
Content-Type extr; charsat=GEK Last-Modified Mon, 16 Mar 2009 20:35:26 GMT 
Transfer-Encoding chunked FESSES b 
Vary Accept-Encoding dey T 
ETag "6799 1f0d7626c91:0' 
Cache-Control max-age=120 Sna BESA 
Xia 1.15yt37:8105 (Cdn Cache Server 
V2.0), 1.1 2b19:9080 (Cdn Cache Server X-Powered-By ASP.NET 
v2.0) Date Sat, 31 Aug 2013 03:01:24 GMT 
[Connection kerp-alve Content-Length 1020 
图 5.13 www. 163. com 响应 头 结构 图 5.14 访问 www. microsoft. com 的 请 求 头 和 响应 头 


5.3.2 MFC CHtmlView 编程 模型 


除了 使 用 图 5. 1 中 给 出 的 MFC WinInet 类 开发 Web 客户 程序 以 外 , MFC 封装 的 
CHtmlView 类 用 于 在 MFC 文档 /视图 结构 的 程序 框架 中 提供 浏览 器 控件 的 功能 。MFC 
提供 了 单 文档 类 型 (SDI) 和 多 文档 类 型 (MDI) 两 种 应 用 程序 编程 框架 ,编程 框架 将 文档 和 
视图 有 机 地 结合 在 一 起 ,形成 了 文档 /视图 结构 的 高 效 开发 模式 。 编 程 框架 中 的 视图 对 象 都 
是 派生 自 某 一 层次 的 视图 类 ,如 图 5. 15 所 示 ,这些 视图 类 都 在 CView 的 基础 上 进行 了 若干 
扩展 和 定制 。 如 果 程 序 的 视图 由 CHtmlView 类 派生 , 则 派生 视图 可 以 浏览 网 站 上 的 Web 
页 面 . 本 地 文件 以 及 网 络 上 的 文件 。CHtmlView 类 支持 超 链接 和 URL. 导航 ,并 能 记录 历 
史 访 问 列表 。 换 而 言 之 ,这 几乎 等 于 在 视图 中 内 柑 了 一 个 小 型 浏览 器 。CHtmlView 类 的 派 
生 关 系 如 图 5. 15 所 示 。 

CHtmlView 类 的 常用 成 员 函 数 描述 如 表 5. 11 所 示 。 


CObject 
CCmdTarget 


Cwnd 


CView 
CScrollView 


CFormView 


CHtmlView 


图 5.15 CHtmlView 类 的 继承 层次 
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表 5.11 CHtmlView 类 的 常用 成 员 函 数 


成 员 函 数 名 称 


成 员 函 数 功能 


Create 

ExecWB 
GetAddressBar 
GetApplication 
GetBusy 
GetContainer 
GetFullName 
GetFullScreen 
GetHeight 
GetHtmlDocument 
GetLeft 
GetLocationName 
GetLocationURL 
GetMenuBar 
GetOffline 
GetParentBrowser 
GetProperty 
GetReadyState 
GetSource 
GetStatusBar 
GetTheaterMode 
GetToolBar 
GetTop 
GetTopLevelContainer 
GetType 
GetVisible 
GetWidth 

GoBack 

GoForward 
GoHome 

GoSearch 
LoadFromResource 
Navigate 

Navigate2 
OnBeforeNavigate2 
OnDocumentComplete 
OnDownloadBegin 
OnDownloadComplete 
OnFullScreen 
OnGetHostInfo 
OnMenuBar 
OnNavigateComplete2 


创建 浏览 器 控件 

执行 命令 

确定 Internet Explorer 对 象 的 地 址 栏 是 否 可 见 
调用 该 成 员 函 数 检索 应 用 程序 支持 的 自动 化 对 象 
检索 下 载 或 其 他 操作 是 否 正在 进行 

检索 Web 浏览 器 控件 的 容器 

检索 全 名 

指示 浏览 器 控件 是 否 全 屏 模 式 

检索 主 窗口 的 高 度 

K SUR C HTML 文档 

检索 主 窗口 左边 缘 的 屏幕 坐标 

检索 当前 浏览 器 显示 资源 的 名 称 

检索 当前 浏览 器 显示 资源 的 URL 

检索 菜单 栏 

检索 控件 是 否 处 于 脱 机 状态 

检索 父 窗口 

检索 属性 的 当前 值 

检索 浏览 器 对 象 的 就 绪 状 态 

获取 网 页 的 HTML 源 代码 
获取 窗 体 的 状态 栏 

检索 浏览 器 控件 是 否 处 于 Theater 模式 
获取 工具 栏 

获取 主 窗口 上 边缘 的 屏幕 坐标 

检索 当前 对 象 是 否 为 浏览 器 控件 的 顶级 容器 
获取 文档 对 象 的 类 型 名 称 
获取 对 象 是 否 可 见 

获取 主 窗口 的 宽度 

导航 到 历史 记录 列表 中 的 上 一 项 

导航 到 历史 记录 列表 中 的 下 一 项 

导航 到 当前 Home 或 启动 页 
导航 到 当前 搜索 页 

在 浏览 器 控件 中 加 载 资源 

导航 到 URL 确定 的 资源 

导航 到 URL 确定 的 资源 

在 特定 浏览 器 导航 之 前 发 生 

当 文档 处 于 READYSTATE_COMPLETE 状态 时 调用 
当 导 航 操作 开始 时 调用 

当 完成 导航 操作 时 调用 

当 全 屏 属性 更 改 时 调用 

检索 Internet Explorer 或 MSHTML 主机 信息 
当 MenuBar 属性 更 改 时 调用 

当 超 链接 完成 时 调用 
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成 员 函 数 名 称 成 员 函 数 功 能 
OnNavigateError 当 超 链接 导航 失败 时 调用 
OnNewWindow2 当 用 一 个 新 窗口 显示 资源 时 调用 
OnProgressChange 当 程序 更 新 下 载 操作 的 进度 时 调用 
OnPropertyChange 当 用 PutProperty 方法 更 改 属性 值 时 调用 
OnQuit 当 应 用 程序 退出 时 调用 
OnShowContextMenu 当 显示 上 下 文 菜单 时 调用 
OnShowUI 当 显 示 菜 单 和 工具 栏 时 调用 
OnStatusBar 当 StatusBar 属性 更 改 时 调用 
OnStatusTextChange 当 状 态 栏 中 的 文本 与 浏览 器 控件 更 改 时 调用 
OnTheaterMode 当 TheaterMode 属性 更 改 时 调用 
OnTitleChange 当 文档 标题 更 改 时 调用 
OnToolBar 当 工 具 栏 属性 更 改 时 调用 
OnUpdateUI 通知 宿主 某 些 控件 的 顺序 发 生 了 变化 
Refresh 重新 加 载 当 前 文件 
Refresh2 重新 加 载 当前 文件 
SetAddressBar 设置 Internet Explorer 对 象 的 地 址 栏 
SetFullScreen 设置 控件 是 否 全 屏 模 式 
SetHeight 设置 主 窗口 的 高 度 
SetLeft 设置 主 窗口 的 水 平 位 置 
SetMenuBar 设置 控件 的 菜单 栏 
SetOffline 设置 控件 是 否 处 于 脱 机 状态 
SetStatusBar 设置 Internet Explorer 的 状态 栏 
SetTheaterMode 设置 浏览 器 控件 的 Theater 模式 
SetToolBar 设置 控件 的 工具 栏 
SetTop 设置 主 窗口 的 垂直 位 置 
SetVisible 设置 对 象 是 否 可 见 
SetWidth 设置 主 窗口 的 宽度 
Stop 终止 正在 打开 文件 的 操作 


其 中 ,导航 到 目标 资源 有 Navigate 和 Navigate2 两 种 方式 ,Navigate2 自身 又 有 3 种 用 
现 将 其 语法 显示 如 下 ,对 于 其 详细 用 法 请 读者 参阅 MSDN, 


void Navigate( 
LPCTSTR URL, 
DWORD dwFlags = 0, 
LPCTSTR lpszTargetFrameName = NULL, 
LPCTSTR lpszHeaders - NULL, 
LPVOID lpvPostData - NULL, 
DWORD dwPostDataLen - 0 
E 


& 


void Navigate2( 
LPITEMIDLIST pIDL, 
DWORD dwFlags = 0, 
LPCTSTR lpszTargetFrameName - NULL 
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); 


void Navigate2( 
LPCTSTR 1pszURL, 
DWORD dwFlags = 0, 
LPCTSTR lpszTargetFrameName = NULL, 
LPCTSTR 1pszHeaders = NULL, 
LPVOID 1pvPostData = NULL, 
DWORD dwPostDataLen = 0 
); 


void Navigate2( 
LPCTSTR 1pszURL, 
DWORD dwFlags, 
CByteArray& baPostedData, 
LPCTSTR lpszTargetFrameName - NULL, 
LPCTSTR lpszHeader - NULL 
); 


5.3.3 MFCIE 的 功能 和 技术 要 点 


本 节 的 目标 是 用 CHtmlView 类 实现 一 个 浏览 器 程序 ,在 VS2010 中 创建 的 项 目 名称 为 
MFCIE, MFCIE 实现 的 功能 完全 类 似 微软 公司 的 IE 浏览 器 ,用 户 可 以 使 用 这 个 自制 的 浏 
览 器 访问 任何 网 站 .下 载 文件 .提交 表单 .打开 本 地 文件 等 。 网 址 可 以 通过 CReBar 控件 创 
建 的 工具 条 输入 并 导航 到 目标 资源 ,可 以 在 主 窗口 中 单 击 各 种 超 链接 。 

这 个 实例 实现 了 浏览 器 的 一 些 常 用 操作 ,例如 立即 转 到 主页 或 后 退 到 上 一 页 面 , 设 置 字 
体 大 小 等 。MFCIE 也 实现 了 收藏 夹 的 基本 操作 。 用 MFCIE 访问 人 民 网 首页 的 结果 如 
图 5. 16 所 示 。 
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图 5.16 用 自制 的 浏览 器 MFCIE 访问 人 民 网 
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MFCIE 项 目的 技术 要 点 如 下 : 

(1) 用 MFC 应 用 程序 向 导 创建 文档 /视图 结构 的 框架 程序 。 

(2) CHtmlView 类 的 用 法 ,如 GoHome, Navigate2、GoBack、GoForward、GoSearch、 
Stop, Refresh, Exec WB 成 员 函 数 的 使 用 等 。 

(3) CToolBarCtrl 类 、CReBar 类 、CAnimateCtrl 类 、CComboBoxEx 类 的 用 法 。 


5.3.4 MFCIE 的 创建 步骤 
1. 利用 MFC 应 用 程序 向 导 创 建 MFCIE 应 用 程序 框架 


CD 启动 VS2010, 选 择 “ 文 件 一 新 建 一 项 目 ” 命 令 , 弹 出 “新 建 项 目 ” 对 话 框 , 设 定 模 板 为 
MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名 称 、 解 决 方案 名 称 为 MFCIE, 并 指定 项 目 保存 
位 置 ,然后 单 击 “ 确 定 ” 按 钮 ,进入 MEC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 的 第 一 步 ,将 应 用 程序 类 型 设 定 为 “单个 文档 ”, 并 选择 “ 文 
档 /视图 结构 支持 ” 复 选 框 ,如 图 5. 17 所 示 。 


MFC 应 用 程序 向 导 - MFCIE 


—— 
| 应 用 程序 类 型 


UB rat mama 
OET) Ome mW 
O 〇 多 个 文 着 册 O tinim: WERE WO 
O ima Studio) 


oam 


OST 
[7] 文档/ 视 加 结构 友和 四 
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图 5.17 设 定 应 用 程序 类 型 


(3) 在 MFC 应 用 程序 向 导 的 第 二 步 ,设置 复合 文档 支持 为 无 。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 ,设置 文档 模板 属性 如 图 5. 18 所 示 。 

(5) 在 MFC 应 用 程序 向 导 的 第 四 步 ,设置 数据 库 支 持 为 无 。 

(6) 在 MFC 应 用 程序 向 导 的 第 五 步 , 在 用 户 界面 功能 模板 中 设置 命令 栏 样式 为 “使 用 
经 典 菜 单 ”, 并 选择 “使 用 浏览 器 样式 的 工具 栏 " 复 选 框 ,如 图 5. 19 所 示 o 

(7) 在 MFC 应 用 程序 向 导 的 第 六 步 , 对 于 高 级 功能 不 做 修改 。 

(8) 在 MFC 应 用 程序 向 导 的 第 七 步 , 生 成 类 时 应 将 CMFCIEView 的 基 类 设置 为 
CHtmlView, 其 他 3 个 类 不 做 修改 ,如 图 5. 20 所 示 。 
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图 5.18 设置 文档 模板 属性 


MFC 应 用 程序 向 导 
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图 5.19 设置 程序 界面 风格 


单 击 “ 完 成 "按钮, MEC 应 用 程序 向 导 生 成 的 解决 方案 如 图 5. 21 所 示 ,生成 的 应 用 程序 


框架 包含 以 下 4 个 类 。 


CD 应 用 程序 类 : CMFCIEApp, 对 应 MFCIE. h 和 MFCIE. cpp。 
(2) 框架 类 : CMainFrame ,对 应 MainFrm. h 和 MainFrm. cpp。 
(3) 文档 类 : CMFCIEDoc. X ij MFCIEDoc. h 和 MFCIEDoc. cpp。 


(4) 视图 类 : CMFCIEView X1 MFCIEView. h 和 MFCIEView. cpp。 


现在 编译 运行 项 目 , 已 经 可 以 连接 到 微软 公司 的 Visual Studio 网 站 ,如 图 5. 22 所 示 ， 
这 都 有 赖 于 CHtmlView 类 的 功能 封装 。 
下 面 要 做 的 就 是 基于 向 导 的 工作 完成 程序 的 个 性 化 定制 和 业务 逻辑 设计 。 
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MFC 应 用 程序 向 导 - MFCIE 


图 5.20 将 CMFCIEView 的 基 类 设置 为 CHtmlView 
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图 5.21 MFCIE 项 目的 解决 方案 图 5.22 MFC 向 导 自动 完成 的 设计 


Visual C++ & hac E 


2. 修改 菜单 和 定制 菜单 


在 资源 视图 中 展开 Menu 资源 条 目 , 双 击 IDR_MAINFRAME, 进 入 菜单 编辑 器 ,根据 
K 5.12 完成 菜单 的 修改 。 
表 5.12 菜单 的 修改 


菜单 项 控件 ID 菜单 项 名 称 主 菜单 
ID GO BACK 后 退 转 到 
D_GO_FORWARD 前 进 转 到 
ID GO START PAGE 主页 转 到 


ID GO SEARCH THE WEB 搜索 转 到 
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续 表 

菜单 项 控件 ID 菜单 项 名 称 主 菜 单 
ID_VIEW_FONTS_LARGEST 字体 最 大 视图 一 字体 
ID_VIEW_FONTS_LARGE 字体 较 大 视图 一 字体 
ID_VIEW_FONTS_MEDIUM 字体 中 视图 一 字体 
ID_VIEW_FONTS_SMALL 字体 较 小 视图 一 字体 
ID_VIEW_FONTS_SMALLEST 字体 最 小 视图 一 字体 
ID_VIEW_STOP 停止 视图 
ID_VIEW_REFRESH 刷新 视图 
IDR_FAVORITES_POPUP 收藏 夹 视图 
IDR_FONT_POPUP 字体 视图 


3. 修改 和 定制 工具 栏 ` 状 态 栏 
在 MainFrm. h 和 MainFrm. cpp 文件 中 使 用 以 下 3 个 类 完成 工具 栏 和 状态 栏 的 设 定 。 


CStatusBar m wndStatusBar; 
CToolBar m wndToolBar; 
CReBar m wndReBar; 


4. 为 菜单 项 添加 单 击 事件 处 理 函 数 


当 用 户 选 择 菜单 命令 或 单 击 工具 栏 上 的 快捷 按钮 时 ,需要 转 到 相应 的 处 理 函数 执行 业 
务 迎 辑 。 进 入 MFC 类 向 导 , 选 择 CMFCIEView 类 为 当前 类 ,然后 切换 到 “命令 ”选项 卡 ,在 
左下 角 选 择 控件 对 应 的 ID ,在 中 间 的 消息 列表 框 中 选择 消息 COMMAND, 单 击 “ 添 加 处 理 
程序 ”按钮 ,添加 成 员 函 数 到 下 面 的 列表 框 中 。 单 击 * 确 定 ” 按 钮 , 则 所 有 操作 会 自动 反映 到 
MFCIEView. h 和 MFCIEView. cpp 中 。 完 成 的 事件 处 理 函 数 如 表 5. 13 所 示 o 


表 5.13 添加 菜单 项 事件 处 理 函数 


菜单 项 控件 ID 消息 类 型 消息 响应 成 员 函 数 
ID_GO_BACK COMMAND OnGoBack() 
D_GO_FORWARD COMMAND OnGoForward() 

ID GO START PAGE COMMAND OnGoStartPage() 

ID GO SEARCH THE WEB COMMAND OnGoSearchTheWeb() 
ID VIEW FONTS LARGEST COMMAND OnViewFontsLargest() 
ID VIEW FONTS LARGE COMMAND OnViewFontsLarge() 
ID VIEW FONTS MEDIUM COMMAND OnViewFontsMedium() 
ID VIEW FONTS SMALL COMMAND OnViewFontsSmall() 
ID_VIEW_FONTS_SMALLEST COMMAND OnViewFontsSmallest() 
ID_VIEW_STOP COMMAND OnViewStop() 


ID_VIEW_REFRESH COMMAND OnViewRefresh() 
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5. 在 MFCIEView. cpp 中 添加 事件 函数 和 成 员 函 数 业务 逻辑 代码 


/7 打开 文件 


void CMfcieView: 


{ 


CString str; 


:OnFileOpen( ) 


str.LoadString(IDS FILETYPES); 
CFileDialog fileDlg(TRUE, NULL, NULL, OFN HIDEREADONLY, str); 
if(fileDlg.DoModal() -- IDOK) 

Navigate2(fileDlg.GetPathName(), 0, NULL); 


) 


// 几 个 简单 操作 的 实现 函数 


void CMfcieView: 


{ 
GoBack() ; 
) 


void CMfcieView:: 


{ 
GoForward(); 


) 


{ 
GoSearch() ; 
) 


void CMfcieView:: 


( 
GoHone( ) ; 
) 


void CMfcieView:: 


{ 
Stop(); 
) 


void CMfcieView:: 


{ 
Refresh(); 
) 


:OnGoBack( ) 


OnGoForward() 


void CMfcieView: :OnGoSearchTheWeb( ) 


OnGoStartPage() 


OnViewStop() 


OnViewRefresh() 


// 后 退 


// 前 进 


// 检 索 


// 转 到 主页 


// 停 止 


// 刷 新 


对 于 字体 大 小 的 控制 使 用 ExecWB() 函数 实 现 ; 对 于 工具 栏 等 的 实现 代码 请 读者 从 清 
华 大 学 出 版 社 的 教学 服务 网 上 下 载 项 目 源 文件 进行 查看 。 


5.3.5 MFCIE 功能 测试 


现在 用 这 款 自制 的 浏览 器 上 网 冲浪 ,大 家 可 以 感觉 到 它 一 点 也 不 逊色 于 IE, Firefox, 
Opera 和 Safari 等 知名 的 商业 化 浏览 器 ,看 看 图 5. 16 访问 人 民 网 的 结果 ,再 试 试 其 他 一 些 
网 站 。 图 5. 23 所 示 为 在 访问 凤凰 网 时 出 现 了 一 点 异样 ,虽然 单 击 “ 是 ”或 “ 否 ” 按 钮 不 影响 浏 
览 , 但 用 户 总 是 会 有 疑问 的 。 
再 来 试 试 搜狐 .新浪 、 网 易 等 门户 网 站 ,都 没有 问题 。 图 5. 23 中 的 BUG 是 浏览 器 对 网 


站 使 用 的 JavaScript 脚本 支持 不 够 的 结果 。 


一 种 解决 方法 是 使 用 CHtmlView 类 的 


SetSilent 方法 屏蔽 不 支持 的 脚本 , 即 在 MFCIEView. cpp 中 修改 OnInitialUpdate O 函数 


四 凤凰 网 - MFCIE 
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图 5.23 访问 凤凰 网 时 出 现 的 BUG 
在 尾部 加 入 一 行 SetSilent 代码 : 


void CMfcieView: :OnInitialUpdate() 

{ 

// 最 初 进入 首页 

CHtmlView: :OnInitialUpdate( ); 

CString strCmdLine(AfxGetApp() -» m lpCmdLine); 


if(strCndLine == T("")) 
{ 

GoHone() ; 
else 
{ 

Navigate(strCmdLine); 
SetSilent(true); 
) 


重新 编译 运行 ,访问 凤凰 网 的 BUG 消失 。 
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电子 邮件 是 互联 网 最 基本 的 应 用 服务 之 一 ,其 便捷 、 高 效 、 低 廉 的 通信 方式 为 现代 经 济 
社会 的 发 展 带 来 了 勃勃 生机 。 本 章 讲 述 电子 邮件 编程 ,包括 发 送 邮件 和 接收 邮件 两 部 分 内 
容 。 如 果 要 实现 Outlook Express, Foxmail 这 样 的 电子 邮件 客户 端 程序 ,用 户 需要 首先 了 
fit HE SMTP 协议 和 POP3 协议 的 通信 原理 。 


6.1 SMTP 协议 


SMTP 即 简单 邮件 传输 协议 , 它 是 一 组 用 于 由 源 地 址 到 目的 地 址 传送 邮件 的 规则 , 规 
定 信件 的 发 送 和 中 转 方 式 。SMTP 协议 属于 TCP/IP 协议 族 ,RFC 821 对 SMTP 协议 作出 
了 具体 规定 ,了 解 和 掌握 SMTP 协议 的 工作 原理 是 编写 发 送 邮 件 程 序 的 基本 要 求 。 下 面 简 
要 介绍 SMTP 协议 的 工作 模型 .命令 码 ,响应 码 等 知识 。 


6.1.1 SMTP 工 作 模 型 


SMTP 协议 基于 图 6. 1 所 示 的 模型 通信 ,邮件 的 发 送 者 和 接收 者 之 间 建 立 了 双向 的 传 
输 信道 ,以 交换 约定 的 命令 和 应 答 的 方式 完成 邮件 数据 的 传输 。 该 协议 的 原理 很 简单 : 一 
个 客户 端 计算 机 向 服务 器 发 送 命 令 , 服 务 器 向 客户 端 计算 机 返回 一 些 信 息 。 客 户 端 发 送 的 
命令 以 及 服务 器 的 回应 都 是 字符 串 。 


Hr je- SMTP 命 令 /响应 
和 邮件 内 容 
SMTP 发 送 者 [= 一 -一 -一 一 = SMTP 接 收 者 
文件 | _ _ | 文件 
系统 系统 
发 送 方 接收 方 


6.1 SMTP 工作 模型 


SMTP 发 送 邮件 的 过 程 如 下 : 

邮件 传输 通道 建立 后 ,SMTP 发 送 者 发 送 MAIL 命令 指明 邮件 发 送 者 。 如 果 SMTP 接 
收 者 可 以 接收 邮件 则 返回 OK 应 答 。SMTP 发 送 者 再 发 出 RCPT 命令 确认 邮件 是 否 能 接 
收 到 。 如 果 SMTP 接收 者 接收 , 则 返回 OK 应 答 ; 如 果 不 能 接收 到 , 则 发 出 拒绝 接收 应 答 
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(但 不 终止 整个 邮件 操作 ) ,双方 将 如 此 重复 多 次 。 接 收 者 接收 全 部 邮件 内 容 后 会 收 到 一 个 
特别 的 字符 序列 ,如 果 接 收 者 成 功 地 处 理 了 邮件 , 则 返回 OK 应 答 。 

可 以 借助 Telnet 程序 来 演示 SMTP 工作 原理 ,下 面 以 向 163 的 SMTP 服务 器 发 送 一 
封 邮件 为 例 进 行 说 明 。 在 Windows 命令 窗口 中 启动 Telnet 程序 ,远程 主机 指定 为 smtp. 
163. com, 端 口号 指定 为 25, 其 交互 过 程 如 下 : 


c:\telnet // 启 动 程序 
Microsoft Telnet» / [3t A Telnet 会 话 模式 
Microsoft Telnet > open smtp. 163. com 25 // 建 立 到 163 邮件 服务 器 的 连接 


服务 器 响应 : 220 163. com Anti- spam GT for Coremail System (163com[20121016]) 


连接 成 功 后 ,进入 SMTP 会 话 模式 ,SMTP 会 话 过 程 和 步骤 如 下 : 


发 送 方 发 送 : HELO smtp. 163. com 

接收 方 响应 : 250 OK 

发 送 方 发 送 : AUTH LOGIN 

接收 方 响应 : 334 dXNlcm5hbWU6 

发 送 方 发 送 : dXBzdW5ueTIwMDhAMTYzLmNvbQ == (upsunny2008@163. com 的 Base64 编码 ) 
接收 方 响应 : 334 UGFzc3dvcm06 

发 送 方 发 送 : enp6MjAxMw == (邮箱 密码 zzz2013 的 Base64 编码 ) 
接收 方 响 应 : 235 Authentication successful 

发 送 方 发 送 : MAIL FROM: upsunny2008(@163. com 

250 Mail OK 

送 : RCPT TO:upsunny2008@163. com 

点 : 250 Mail OK 


: DATA 
接收 方 响应 : 354 Please start mail input. 
发 送 方 发 送 : Hello,Morning! 


发 送 方 发 送 : Are you buzy? 

发 送 方 发 送 : Good bye! 

发 送 方 发 送 : . 

接收 方 响应 : 250 Mail queued for delivery. 
QUIT 


上 述 SMTP 会 话 的 命令 交互 过 程 如 图 6. 2 所 示 


Telnet smtp. 163. com 


334 dXNlcnShbyU6 
|aXBzdUSueTI uM DhAMIYzLaNvbQ-- 
3dvcnQ6 


Mail queued for delivery. 


图 6.2 向 smtp. 163. com 发 送 一 封 邮件 的 会 话 过 程 
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这 是 一 个 简单 的 发 送 邮 件 的 会 话 过 程 , 当 用 户 使 用 Outlook Express 等 客户 软件 发 送 
邮件 时 ,在 后 人 台 进 行 的 交互 也 是 这 样 一 个 过 程 ,当然 ,SMTP 协议 为 了 处 理 复杂 的 邮件 发 送 
情况 (如 附件 等 ) ,定义 了 很 多 扩展 命令 及 规定 。 打 开 163 信箱 ,用 户 可 以 看 到 这 封 由 Telnet 
辛苦 完成 的 邮件 已 经 到 达 。 信 件 内 容 如 下 : 


Hello, Morning! 
Are you busy? 
Good bye! 


6.1.2 SMTP 命令 解析 


SMTP 命令 控制 邮件 传输 的 进程 ,SMTP 命令 是 由 命令 码 和 其 后 的 参数 域 组 成 的 。 命 
令 码 由 4 个 字母 组 成 ,不 区 分 大 小 写 ,命令 码 和 参数 由 一 个 或 多 个 空格 分 开 。 
下 面 列 出 的 是 SMTP 基本 命令 : 


HELO < SP >< domain >< CRLF > 

MAIL < SP > FROM:< reverse 一 path>< CRLF > 
RCPT < SP» TO:< forward - path>< CRLF > 
DATA < CRLF > 

RSET < CRLF > 

SEND < SP > FROM:< reverse — path >< CRLF > 
SOML < SP > FR0M:< reverse - path>< CRLF > 
SAML < SP > FR0M:< reverse - path>< CRLF > 
VRFY < SP >< string >< CRLF > 

EXPN < SP >< string>< CRLF > 

HELP [< SP >< string>] < CRLF > 

NOOP < CRLF > 

QUIT < CRLF > 

TURN < CRLF > 


关于 这 些 命令 的 用 法 ,请 读者 参阅 RFC 821 文档 。 
6.1.3 SMTP 响应 状态 码 


SMTP 命令 操作 开始 后 ,命令 或 参数 能 否 被 接收 方 接受 ,必须 返回 相应 的 应 答 ,这 些 应 
答 的 开头 部 分 都 会 带 一 个 3 位 的 状态 码 。 观 察 图 6. 2 给 出 的 会 话 过 程 ,凑巧 返回 的 都 是 成 
功 响应 。 

下 面 给 出 一 个 SMTP 会 话 实例 : 在 Alpha. ARPA 主机 的 Smith 发 送 邮件 给 Beta. 
ARPA 主机 的 Jones,Green 和 Brown, 这 里 假定 主机 Alpha 与 主机 Beta 直接 相连 ,S 表示 
发 送 方 ,R 表示 接收 方 。 双 方 的 会 话 过 程 如 下 : 

MAIL FROM:< Smith@ Alpha. ARPA > 
250 OK 

RCPT TO:< Jones@ Beta. ARPA > 
250 OK 

RCPT T0:< Green@ Beta. ARPA > 


550 No such user here 
RCPT TO:< Brown@ Beta. ARPA > 


(Q g Q m Q m Q 
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250 OK 

DATA 

354 Start mail input; end with < CRLF >.< CRLF > 
Blah blah blah... 


< CRLF >.< CRLF > 
250 OK 


可 以 看 出 邮件 被 Jones 和 Brown 接收 ,而 Green 在 Beta. ARPA 主机 上 没有 邮箱 。 
对 SMTP 命令 的 响应 保证 了 “发 送 SMTP 一 方 ”知道 “接收 SMTP 一 方 ”的 状态 。 
SMTP 响应 的 3 位 应 答 码 的 每 一 位 都 有 特定 的 含义 ,从 第 1 位 到 第 3 位 ,发 送 方 可 以 逐 
步 确定 接收 方 应答 的 含义 ,如 表 6. 1 所 示 。 
表 6.1 SMTP 响应 码 的 含义 


moo uUum 


第 1 位 应 答 码 的 含义 
部 分 完成 应 答 ,命令 被 接受 ,但 是 要 求 的 操作 被 中 止 ,原因 在 应 答 码 中 。 发 送 方 应 该 再 次 发 送 
另 一 命令 指明 是 否 继续 操作 ,或 者 放弃 操作 
2yz “| 全 部 完成 应 答 , 要 求 的 操作 已 经 完成 ,可 以 开始 另 一 个 新 的 请 求 
部 分 完成 应 答 ,需要 发 送 方 提供 进一步 的 信息 。 命 令 被 接受 ,但 是 要 求 的 操作 被 中 止 , 需 要 接 
收 进一步 的 信息 ,发 送 方 应 该 发 送 另 一 条 命令 指明 进一步 的 信息 
暂时 未 完成 应 答 ,命令 未 被 接受 ,要求 的 操作 也 未 执行 ,但 是 发 生 错 误 的 状态 是 暂时 的 ,可 以 
再 一 次 请 求 操作 
5yz ”| 永久 未 完成 应 答 ,命令 未 被 接受 ,要 求 的 操作 未 完成 ,重复 发 送 命令 不 起 作用 
第 2 位 应 答 码 的 含义 
x0z ”| 此 类 型 的 应 答 是 用 于 语法 错误 的 
xlz ”| 此 类 型 的 应 答 是 用 于 请 求 信息 的 ,如 状态 或 帮助 信息 
x2z “| 此 类 型 的 应 答 是 关于 传输 信道 的 
x3z ”| 未 使 用 
x4z 未 使 用 
x5z ”| 此 类 型 的 应 答 是 关于 邮件 系统 的 状态 消息 的 
第 3 位 应 答 码 包含 更 详细 的 信息 ,下面 给 出 常用 应 答 码 的 含义 
501 参数 格式 错误 
502 ”| 命令 不 可 实现 
503 ”| 错误 的 命令 序列 


lyz 


3yz 


4yz 


504 命令 参数 不 可 实现 


211 “| 系统 状态 或 系统 帮助 响应 


214 — 帮助 信息 


220 — 服务 就 绪 


221 ”| 服务 关闭 传输 信道 


421 | 服务 未 就 绪 , 关 闭 传输 信道 ( 当 必须 关闭 时 ,此 应 答 可 以 作为 对 任何 命令 的 响应 ) 


250 ”| 要求 的 邮件 操作 完成 


251 用 户 非 本 地 ,将 按照 前 向 路 径 一 forward-path> 转 发 


450 “| 要求 的 邮件 操作 未 完成 ,邮箱 不 可 用 (例如 邮箱 忙 ) 


550 ”| 要 求 的 邮件 操作 未 完成 ,邮箱 不 可 用 (例如 邮箱 未 找到 或 不 可 访问 ) 


451 ”| 放弃 要 求 的 操作 ; 处 理 过 程 中 出 错 
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第 3 位 应 答 码 包含 更 详细 的 信息 ,下面 给 出 常用 应 答 码 的 含义 
551 “| 用 户 非 本 地 ,将 尝试 前 向 路 径 一 forward-path> 
452 | 系统 存储 不 足 ,要 求 的 操作 未 执行 
552 ”| 存储 分 配 过 量 ,要求 的 操作 未 执行 
553 “| 邮箱 名 不 可 用 ,要 求 的 操作 未 执行 (例如 邮箱 格式 错误 
354 “| 开始 邮件 输入 ,以 <CRLF>>. 天 CRLF> 结 束 
554 ”| 操作 失败 


6.2 POP3 协议 


客户 端 接收 邮件 可 以 用 两 种 协议 方式 : 一 种 是 POP3(Post Office Protocol Version 3), 
即 邮局 协议 的 第 3 个 版 本 ,由 RFC 1939 定义 ; 另 一 种 是 IMAP4 (Internet Mail Access 
Protocol Version 4) , 即 Internet 邮件 访问 协议 的 第 4 个 版 本 ,由 RFC 3501 定义 。 本 节 主 
要 讨论 POP3 协议 的 基本 原理 。 


6.2.1 POP3 工作 模型 


POP3 协议 支持 “离线 ”邮件 处 理 ,POP3 协议 默认 端口 为 110 ,底层 传输 协议 使 用 TCP. 
其 接收 邮件 的 过 程 如 下 : 

CD 电子 邮件 客户 端 连接 服务 器 ,下 载 所 有 未 阅读 的 电子 邮件 。 这 种 离线 访问 模式 是 
一 种 存储 转发 服务 ,将 邮件 从 邮件 服务 器 端 传送 到 个 人 终端 机 上 。 

(2) 一 旦 邮件 发 送 到 终端 机 上 ,邮件 服务 器 上 的 邮件 将 会 被 删除 ,也 可 以 “只 下 载 邮件 ， 
服务 器 端 并 不 删除 ”。 

图 6. 3 描述 了 POP3 客户 机 与 POP3 服务 器 的 会 话 过 程 ,这 期 间 有 3 种 重要 的 状态 转 
换 , 即 认证 状态 ,处 理 状态 和 更 新 状态 。 

(1) 认证 状态 : 当 客户 机 请 求 与 服务 器 建立 连接 时 ,客户 机 向 服务 器 发 送 自己 的 身份 
(这 里 指 的 是 账户 和 密码 ) ,服务 器 进行 校 验 ,客户 端 处 于 认证 状态 。 

(2) 处 理 状态 : 如 果 服 务 器 认证 成 功 , 则 客户 端 由 认证 状态 转 入 处 理 状态 。 在 处 理 状 
态 , 客 户 机 可 以 使 用 POP 命令 列 出 未 读 邮 件 、 删 除 邮 件 、 下 载 邮件 等 。 

(3) 更 新 状态 : 如 果 客 户 端 发 出 QUIT 命令 , 则 由 处 理 状态 转 入 更 新 状态 。 更 新 状态 
将 那些 作 删 除 标记 的 邮件 删除 。 更 新 状态 完成 后 ,客户 机 重新 进入 认证 状态 ,确认 身份 后 断 
开 与 服务 器 的 连接 。 

其 会 话 过 程 如 图 6. 3 所 示 。 


认证 执行 EH 
建立 连接 [XC ||, — |oUrrfX — De 
认证 状态 处 理 状态 更 新 状态 
sooner . 
一 一 转 入 认证 状态 


图 6.3 客户 机 与 POP3 服务 器 的 会 话 过 程 


6.2.2 POP3 命令 解析 


第 6 章 ”SMTP/P0P3 编 程 


与 SMTP 协议 一 样 ,POP3 协议 也 是 由 若干 命令 和 响应 消息 组 成 的 。POP3 客户 机 与 
服务 器 的 会 话 通过 POP3 命令 和 响应 完成 。POP3 命令 采用 命令 行 形式 ,由 命令 码 和 参数 
组 成 。 服 务 器 响应 由 一 个 命令 行 或 多 个 命令 行 组 成 ,响应 开头 文本 为 十 OK ,表示 命令 执行 
成 功 , 车 为 一 ERR, 表 示 命 令 执 行 失败 。 下 面 将 POP3 命令 的 基本 用 法 和 功能 归纳 为 


表 6.2。 
表 6.2 POP3 命令 的 用 法 和 功能 描述 

命令 参数 状态 功能 描述 

USER username 认证 — 用 户 名 认证 ,此 命令 与 下 面 的 PASS 命令 若 都 成 功 , 将 导致 状 
态 转 换 

PASS password 认证 密码 认证 

APOP NameDigest 认证 Digest 是 MD5 消息 摘要 

STAT 无 处 理 。 请 求 服务 器 发 回 关于 邮箱 的 统计 资料 ,如 邮件 总 数 和 总 字 节 数 

UIDL [Msg#] 处 理 。 返回 邮件 的 唯一 标识 符 ,POP3 会 话 的 每 一 个 标识 符 都 是 唯 
一 的 

LIST [Msg& ] 处 理 ”返回 邮件 数量 和 每 个 邮件 的 大 小 

RETR [Msg# ] 处 理 ”返回 由 参数 标识 的 邮件 的 所 有 文本 

DELE [Msg& ] 处 理 ”服务 器 将 由 参数 标识 的 邮件 标记 为 删除 ,由 QUIT 命令 执行 

RSET None 处 理 服务 器 将 重 置 所 有 标记 为 删除 的 邮件 ,用 于 撤销 DELE 命令 

TOP [Msg#] 处 理 。 服务 器 将 返回 由 参数 标识 的 邮件 的 前 4 行内 容 ,n 必须 是 正 
整数 

NOOP 无 处 理 。 服务 器 返回 一 个 肯定 的 响应 

QUIT 无 更 新 ”由 处 理 状态 转 到 更 新 状态 ,再 返回 认证 状态 


6.2.3 用 POP3 命令 与 163 邮箱 会 话 


下 面 给 出 一 个 用 Windows 自 带 的 Telnet 程序 登录 163 的 POP3 服务 器 ,使 用 POP3 命 
令 访问 个 人 邮箱 的 会 话 实例 ,以 帮助 读者 更 好 地 理解 POP3 的 工作 原理 ,下 面 加 下 划 线 的 部 
分 为 命令 行 输入 。 
CD 进入 控制 台 窗 口 ,输入 Telnet 命令 , 回 车 后 屏幕 上 显示 以 下 命令 提示 符 : 


Microsoft Telnet > 


(2) 用 open 命令 建立 到 服务 器 的 连接 ,命令 行 如 下 : 


open pop. 163.com 110 


控制 台 上 显示 : 


正在 连接 到 pop. 163. com... 


+ OK Welcome to coremail Mail Pop3 Server < 163coms[8db726ec93e9d4e3e9a2fd3d31b05251s]> 


(3) 验证 用 户 名 和 密码 : 


USER upsunny2008 
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+ OK core mail 
PASS zzz2013 


用 户 名 和 密码 不 需要 Base64 编码 ,成 功 登录 后 返回 的 信息 如 下 : 
+ OK 1776 nessage(s) [1083569821 byte(s)] 
这 条 消息 指明 了 邮件 总 数 和 大 小 。 


STAT 
* OK 1776 1083569821 


使 用 STAT 命令 查看 邮箱 状态 ,返回 的 也 是 邮件 总 数 和 大 小 。 上 述 命令 的 执行 过 程 如 
图 6.4 所 示 。 


Telnet pop. 163. com [Ef 


2? (1083569821 bytecs)] 


Hok 1776 1083569821 


图 6.4 成 功 登录 163 服务 器 并 执行 STAT 命令 


(4) 显示 邮件 列表 : 


LIST 


JH LIST 命令 显示 邮件 列表 ,返回 的 是 邮件 序号 和 大 小 。 图 6. 5 是 控 
的 显示 , 即 邮箱 中 共有 1776 封 邮件 ,每 一 封 邮件 后 面 的 数字 表示 邮件 的 大 小 学 — 

(5) 用 TOP 命令 查看 指定 邮件 的 邮件 头 ,0 表示 查看 整个 邮件 头 ,其 他 正 整 数 表示 限 
制 返回 多 少 行 。 例 如 : 


TOP10 


- 屏 


可 以 看 到 发 件 人 、 收 件 人 、 发 件 日 期 .主题 .编码 
- 封 回 复 邮件 。 


图 6.6 给 出 的 是 TOP Pf 令 的 执行 
版 本 、 内 容 Š 


Telnet pop. 16. 


1192.168.208.55 (68.212.1.9351 


581899432 . JavaHai1.corenail&bji63app92.163.con?| 
2982229624.141971201 0195432. JecalieL1 coremaildhdiGdeppi2.163.con 


276 2474205 


图 6.5 用 LIST 命令 显示 邮件 列表 图 6.6 JH TOP 命令 查看 第 1 封 邮 件 的 邮件 头 


官方 
类 的 


(6) 从 服务 器 获取 指定 邮件 : 


RETR 1 


RETR 命令 的 执行 结果 如 图 6. 7 所 示 ,可 见 邮件 正文 以 单独 


OGrX EBMVS t LRuq3K1 bu9oaMK8LuQu60h16PJ7 


- 行 “. 
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图 6.7 
(7) 删除 邮件 : 


以 上 代码 表示 删除 第 1776 封 邮件 ,其 响应 信息 如 下 : 


+ OK core mail 


用 STAT 命令 查看 邮箱 状态 : 


STAT 

其 返回 信息 如 下 : 

+ OK 1775 1081095616 
(8) 退出 : 


QUIT 


+ OK core mail 


用 RETR 获取 第 1 封 邮件 到 本 地 


SMTP/POP3 编 程 


通过 上 述 一 系列 演示 ,目的 是 告诉 读者 要 与 远程 POP3 服务 器 对 话 ,需要 使 用 POP3 的 
语言 (协议 语言 ) 。 当 然 , 这 些 工作 都 可 以 通过 编程 让 Outlook Express 和 Foxmail 之 


程序 去 代劳 。 


6.3 MIME 邮件 扩展 


标准 


多 用 途 互 联网 邮件 扩展 MIME(Multipurpose Internet Mail Extensions) 是 一 个 互联 网 
, 它 扩 展 了 电子 邮件 标准 ,使 其 能 够 支持 非 ASCI 字符 和 二 进 制 格式 附件 等 多 种 格式 
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的 邮件 消息 。 这 个 标准 被 定义 在 RFC 2045, RFC 2046, RFC 2047, RFC 2048, RFC 2049 等 
RFC 中 。MIME 规定 了 用 于 表示 各 种 数据 类 型 的 符号 化 方法 。 另 外 , HTTP 协议 使 用 了 
MIME 的 框架 ,使 得 MIME 被 广泛 地 应 用 于 互联 网 的 信息 传输 服务 。 


6.3.1 MIME 对 电子 邮件 协议 的 扩展 


1982 年 产生 的 RFC 821 定义 了 一 个 在 Internet. 上 传输 文本 邮件 的 标准 格式 。RFC 
821 获得 了 巨大 的 成 功 , 但 由 于 时 代 的 原因 ,RFC 821 没有 考虑 对 多 媒体 文件 的 支持 , 远 远 
不 能 适应 后 来 互联 网 的 发 展 。 其 主要 制约 如 下 : 

RFC 821 规定 电子 邮件 仅 限于 传输 7 位 US-ASCII 文本 ,无 法 传送 非 英 语 字符 ,如 中 
文 俄 文 等 其 他 国家 和 地 区 的 语言 符号 ; 无 法 传递 可 执行 文件 . 音 /视频 文件 .DOC 文件 等 
非 文本 文件 。 为 了 能 用 电子 邮件 传输 各 种 消息 ,RFC 2045-2049 对 互联 网 邮件 标准 进行 了 
扩展 ,形成 了 MIME 解决 方案 。MIME 不 仅 适用 于 电子 邮件 传输 ,也 被 成 功 地 应 用 到 
HTTP 协议 中 ,使 得 浏览 器 可 以 下 载 ,阅读 多 种 媒体 类 型 。 

按照 MIME 标准 构建 的 邮件 称 为 MIME 邮件 ,有 时 也 称 MIME 实体 。MIME 与 原 有 
邮件 协议 的 结合 原则 包括 以 下 几 个 方面 : 

CD 不 改动 SMTP 和 POP3 协议 的 原 有 内 容 , 继 续 使 用 原 有 协议 框架 传输 数据 。 

(2) 邮件 包括 信 头 和 主体 两 个 部 分 ,MIME 在 邮件 中 添加 新 定义 的 信 头 字段 ,并 扩展 了 
邮件 主体 的 结构 。 

(3) 为 非 ACSI 码 消息 定义 编码 规则 ,解决 传输 非 ASCI 消息 的 问题 。 即 在 发 送 端 将 
dE ASCII 消息 转换 为 符合 RFC 821 的 文本 格式 ,仍然 通过 标准 的 SMTP/POP3 协议 传输 ， 
在 接收 端 ,邮件 接收 代理 (接收 程序 ) 将 其 还 原 ( 解 码 ) 为 原来 的 非 ASCI 消息 ,从 而 实现 了 
MIME 邮件 的 传递 。 

因此 ,MIME 邮件 对 RFC 821 邮件 的 扩展 体现 在 以 下 3 个 方面 。 

COD 扩展 信 头 字段 : 新 定义 的 信 头 字段 指定 了 MIME 的 版 本 .邮件 内 容 的 类 型 .编码 方 
式 、 邮 件 的 标识 和 描述 等 信息 。 

(2) 扩展 信 体 结构 : 给 出 了 多 媒体 信息 和 邮件 附件 的 表示 方法 ,在 RFC 821 中 ,对 信 体 
结构 没有 定义 。 

(3) 定义 了 MIME 编码 方法 : 可 将 其 他 格式 的 内 容 转换 为 RFC 821 ASCII 文本 格式 。 

至 此 ,按照 MIME 规范 可 以 构造 非常 复杂 的 邮件 ,邮件 的 正文 支持 多 媒体 ,并 且 人 允许 邮 
件 携带 附件 传输 。 


6.3.2 MIME 对 邮件 信 头 的 扩展 


MIME 定义 了 5 个 新 的 信 头 字段 ,可 以 与 原 有 信 头 字段 一 样 ,用 在 RFC 821 邮件 的 
首部 。 


1. MIME 版 本 


格式 : MIME-Version:1.0 <CRLF> 


$86: ”SMTP/P0P3 编 程 


此 字段 标识 MIME 版 本 号 。 如 果 是 MIME 邮件 ,必须 包含 此 信 头 字段 ,如 果 无 此 行 ， 
说 明 邮 件 格式 为 RFC 821 邮件 。 


2. 邮件 唯一 标识 


格式 : Content-ID: 唯一 标识 信件 的 字符 串 二 CRLF 二 

此 字段 提供 一 种 唯一 地 标识 MIME 实体 (邮件 ) 的 方法 ,与 RFC 821 中 的 Message-ID 
字段 类 似 。 借 助 这 个 字段 ,用 户 可 以 在 一 个 MIME 邮件 中 引用 其 他 的 MIME 邮件 。 如 果 
邮件 的 内 容 类 型 为 Message/External-body, 则 需要 使 用 此 字段 ,对 于 其 他 类 型 ,这 个 字段 是 
可 选 的 。 


3. 邮件 内 容 描 述 


格式 : Content-Description :描述 文本 二 CRLF 二 
描述 文本 是 可 读 的 字符 串 , 用 于 简要 说 明 MIME 邮件 的 内 容 或 主题 。 


4. MIME 邮件 的 内 容 类 型 


格式 : Content Type: 主 类 别 标识 符 / 子 类 别 标识 符 [; 参 数列 表 ] <CRLF> 
例如 : Content-Type: Text/Plain;Charset— "gb2312" —CRLF-— 
此 字段 指明 MIME 邮件 所 包含 的 数据 类 型 ,不 同类 型 对 应 不 同 的 邮件 结构 。 


5. 内 容 传 送 编码 方式 


格式 : Content-Transfer-Encoding: 编码 方式 标识 符 二 CRLF 二 
此 字段 指定 对 邮件 主体 的 编码 .解码 方法 。 


6.3.3 MIME 邮件 的 内 容 类 型 


格式 : Content-Type: 主 类 别 标识 符 / 子 类 别 标识 符 [; 参 数列 表 ] <CRLF> 
每 个 MIME 类 型 由 两 部 分 组 成 ,前 面 是 数据 的 主 类 别 , 例 如 声音 (audio) 、 图 像 (image) 
等 ,后 面 定义 具体 的 种 类 。 常 见 的 MIME 类 型 如 下 。 
° text/html; 超 文 本 标记 语言 文本 ,扩展 名 为 . htm、. html, 
。 text/plain: 普通 文本 ,扩展 名 为 . txt。 
application/rtf: RTF 文本 ,扩展 名 为 . rtf。 
image/gif: GIF 图 形 ,扩展 名 为 . gif. 
image/jpeg .JPEG 图 形 , 扩 展 名 为 . jpeg、. jpg. 
audio/basic: au 声音 文件 ,扩展 名 为 . au。 
audio/midi、audio/x-midi: MIDI 音乐 文件 ,扩展 名 为 . mid、. midi, 
audio/x-pn-realaudio: RealAudio 音乐 文件 ,扩展 名 为 . ra、. ram, 
video/mpeg: MPEG 文件 ,扩展 名 为 . mpg、. mpeg. 
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* video/x-msvideo: AVI 文件 .扩展 名 为 . avi. 

* application/x-gzip: GZIP 文件 ,扩展 名 为 . gz。 

* application/x-tar: TAR 文件 ,扩展 名 为 . tar, 

对 照 图 6.7, 用 RETR 获取 第 1 封 邮件 到 本 地 ,可 以 看 到 邮件 的 类 型 : 


Content - Type: text/plain 


6.3.4 Base64 编码 


Base64 是 MIME 邮件 中 常用 的 编码 方式 之 一 ,其 主要 思想 是 将 输入 的 数据 编码 成 只 含 
有 'A'~'Z' Ja' 一 'z 0' 一 '9'、 十 '、 /这 64 个 可 打印 字符 的 串 , 故 称 为 Base64。 

Base64 是 一 种 用 64 个 可 打印 字符 来 表示 二 进 制 数据 的 编码 方法 。 由 于 2 的 6 次 方 等 
于 64, 所 以 每 6 个 位 元 为 一 个 单元 ,对 应 某 个 可 打印 字符 。3 个 字 节 有 24 个 位 元 ,对 应 于 4 
个 Base64 单元 , 即 3 个 字 节 需要 用 4 个 可 打印 字符 来 表示 。 

完整 的 Base64 定义 见 RFC 1421 和 RFC 2045。 编 码 后 的 数据 比 原始 数据 略 长 ,为 原 
来 的 4/3 倍 。 在 电子 邮件 中 ,根据 RFC 821 的 规定 ,每 76 个 字符 需要 加 上 一 个 回 车 换行 
符 。 在 解码 时 ,这 个 回 车 换行 符 要 去 掉 , 可 以 估算 编码 后 数据 的 长 度 大 约 为 原来 的 
135.1%. 

Base64 的 编码 过 程 如 下 : 

每 次 取 3 个 字 节 的 输入 数据 ,先后 放 入 一 个 24 位 的 输入 缓冲 区 中 , 先 来 的 字 节 占 高 位 。 
数据 不 足 3 个 字 节 时 ,输入 缓冲 区 中 剩 下 的 位 用 0 补足 。 然 后 ,每 次 取出 6 个 位 ,按照 其 值 选 
TÉ" ABCDEFGHIJKLMNOPQRSTUV WX YZabcdefghijkImnopqrstuvwxyz0123456789 十 /” 中 的 
字符 作为 编码 后 的 输出 。 重 复 上 述 步骤 ,直到 输入 数据 全 部 转换 完成 。 

如 果 最 后 剩 下 两 个 字 节 的 输入 数据 ,在 编码 结果 后 面 加 一 个 “=”; 如 果 最 后 剩 下 一 个 
字 节 的 输入 数据 ,编码 结果 后 面 加 两 个 “= 二”; 如 果 正 好 3 个 字 节 一 组 转换 完成 ,编码 结果 后 
面 什么 都 不 加 。 表 6. 3 演示 了 字符 串 “Man” 的 Base64 编码 过 程 。 

表 6.3 用 Base64 算法 将 Man 的 3 个 字母 进行 编码 


文本 M a n 

ASCII 编码 77 97 110 

二 进 制 位 0|1/0/0|1|1[|0/|1|0|1|1/0]0|0/]0]1/0/1|1]0|1/1]|1|0 
索引 19 22 5 46 

Base64 编码 T w F u 


ER 6.3 中 ,Base64 算法 将 3 个 字符 “Man” 编 码 为 4 AER TWF”. MAR 6. 7 中 
收 到 的 邮件 正文 部 分 ,显示 的 两 行内 容 都 是 邮件 正文 的 Base64 码 。 

本 章 后 面 两 节 给 出 的 收发 邮件 实例 ,都 需要 使 用 Base64 的 编码 和 解码 算法 。 表 6.4 给 
出 了 Base64 编码 的 字符 索引 表 。 


$86:  SMTP/POP3 43 


表 6.4 Base64 编码 字符 索引 表 


值 字符 值 字符 值 字符 值 字符 
0 A 16 Q 32 g 48 w 
1 B 17 R 33 h 49 x 
2 c 18 S 34 i 50 y 
3 D 19 T 35 j 51 z 
4 E 20 U 36 k 52 0 
5 F 21 v 37 1 53 
6 G 22 w 38 m 54 2 
7 H 23 x 39 n 55 3 
8 I 24 b 40 o 56 4 
9 J 25 z 41 p 57 5 
10 K 26 a 42 q 58 6 
1 L 27 b 43 r 59 7 
12 M 28 c 44 s 60 8 
13 N 29 d 45 t 61 9 
14 [9] 30 e 46 u 62 + 
15 P 31 f 47 v 63 / 


这 个 表 的 定义 很 有 规律 ,首先 使 用 26 个 大 写 英 文字 母 ,用 “A” 代 表 0, 用 “B” 代 表 1, 以 
此 类 推 。 然 后 是 26 个 小 写 英文 字母 , 接 下 来 是 0 一 9 JE 10 个 数字 ,最 后 用 “十 ”代表 62, 用 
“/” 代 表 63。 这 些 字 符 都 是 可 打印 字符 ,在 经 过 网 关 转 换 时 编码 不 会 被 破坏 ,它们 能 在 互联 
网 上 “畅通 无 阻 ”。 


6.4 SMTP 协议 编程 实例 


本 节 根 据 SMTP 协议 原理 ,实现 一 个 简易 的 SMTP 客户 机 程序 ,这 个 简易 程序 能 够 向 
SMTP 服务 器 发 送 电 子 邮件 ,SMTP 服务 器 收 到 邮件 后 再 将 邮件 转发 到 目标 服务 器 的 邮箱 
里 存放 。 


6.4.1 SMTP 发 送 邮 件 工作 模型 


假定 用 户 在 163 邮件 服务 器 上 注册 了 邮箱 upsunny2008@163. com, 要 用 这 个 邮箱 向 其 
他 邮箱 发 送 一 封 邮件 ,假设 目标 邮箱 为 yantaidxz@ sohu. com, 其 工作 原理 如 图 6. 8 所 示 。 
以 163 邮箱 向 搜狐 邮箱 发 送 邮件 为 例 ,发 送 过 程 大 致 分 为 以 下 5 个 步骤 。 

第 1 步 : 用 户 启动 简易 SMTP 发 送 邮件 程序 (类 似 Outlook Express, Foxmail 客户 程 
VO ,填写 发 件 人 信息 、 收 件 人 信息 ,邮件 标题 .邮件 正文 和 添加 附件 后 , 单 击 * 发 送 邮件 ” 
按钮 。 

第 2 步 : 客户 程序 与 smtp. 163. com 服务 器 通过 若干 SMTP 命令 交互 应 答 ,实现 邮件 
的 传递 ,邮件 到 达 smtp. 163. com 服务 器 。 在 这 期 间 ,邮件 发 送 前 要 进行 MIME 编码 ,要 对 
smtp. 163. com 进行 DNS 解析 等 。 
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第 3 步 : smtp. 163. com 服务 器 的 SMTP 接收 程序 完成 邮件 的 接收 和 缓存 ,立即 向 
smtp. sohu. com 服务 器 的 SMTP 接收 程序 转发 ,进入 第 4 步 的 会 话 和 互动 。 

第 4 步 : smtp. 163. com 服务 器 的 SMTP 发 送 程序 和 smtp. sohu. com 服务 器 的 SMTP 
接收 程序 经 过 若干 步 SMTP 命令 交互 应 答 ,完成 邮件 的 传送 。 

第 5 步 : smtp. sohu. com 服务 器 上 的 SMTP 程序 将 邮件 传送 至 yantaidxz@sohu. com 
邮箱 保存 。 至 此 ,发 送 邮件 的 工作 全 部 完成 。 


[0] @ 9 
简易 SMTP 发 送 邮件 程序 [= -一 -一 -SMTP 会 话 - 一 -一 一 | smtp.l63.com N 


7 
smtp.sohu.com ^ i 


@ 


yantaidxz(@sohu.com 


图 6.8 SMTP 发 送 邮件 工作 模型 


SMTP 扮演 的 角色 有 两 种 : 发 送 SMTP 和 接收 SMTP。 其 具体 工作 过 程 为 : 接收 
SMTP 在 接 到 用 户 的 邮件 请 求 后 ,判断 此 邮件 是 否 为 本 地 邮件 ,若是 直接 投 送 到 用 户 的 邮 
箱 ,否则 向 DNS 查询 远 端 邮件 服务 器 的 MX 记录 ,并 建立 与 远 端 接收 SMTP 之 间 的 一 个 双 
向 传送 通道 ,此 后 SMTP 命令 由 发 送 SMTP 发 出 ,由 接收 SMTP 接收 ,而 应 答 则 反方 向 
传送 。 


6.4.2 功能 和 技术 要 点 


简易 SMTP 客户 程序 运行 的 初始 界面 如 图 6. 9 所 示 。 程 序 的 基本 功能 为 : 发 信人 可 以 
指定 使 用 的 发 信人 邮箱 SM TP. 服务器、 端口 等 发 信人 信息 ; 填写 收 信人 邮箱 、 抄 送 、 暗 送 
等 ; 撰写 邮件 ,包括 邮件 标题 .邮件 正文 和 附件 ; 单 击 * 发 送 邮件 ”按钮 开始 发 送 邮件 。 

本 例 的 技术 要 点 如 下 : 

(1) 运用 VS2010 创建 SMTP 客户 机 项 目 , 理 解 MFC 编程 框架 。 

(2) 从 CAsyncSocket 类 派生 自己 的 MFC 套 接 字 类 ,实现 网 络 的 SMTP 会 话 。 

(3) 理解 派生 的 CSmtpSocket 类 与 MFC 框架 的 关系 ,灵活 运用 Windows 消息 驱动 
机 制 。 

(4) 理解 Base64 编码 、 解 码 的 机 制 。 

(5) 通过 状态 转换 来 控制 SMTP 会 话 命令 的 交换 顺序 。 
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所 Smtp 发 送 邮件 客户 机 


:|smm.163com 


: s 


:Jupsunny2008@163.cc 


图 6.9 简易 SMTP 客户 程序 初始 界面 


6.4.3 项 目 创建 步骤 
1. 使 用 MFC 应 用 程序 向 导 创建 客户 机 程序 框架 


CD 启动 VS2010, 选 择 “ 文 件 一 新 建 一 项 目 ” 命 令 , 弹 出 “新 建 项 目 ” 对 话 框 , 设 定 模 板 为 
MFC, 项 目 类 型 为 “MFC 应 用 程序 ”, 项 目 名 称 、 解 决 方案 名 称 为 SmtpClient, 并 指定 项 目 保 
存 位 置 , 然 后 单 击 “ 确 定 ” 按 钮 ,进入 MFC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 的 第 一 步 ,将 应 用 程序 类 型 设 定 为 “基于 对 话 框 ”。 

(3) 在 MFC 应 用 程序 向 导 的 第 二 步 , 设 置 用 户 界面 选项 ,在 此 设置 对 话 框 标题 为 
“Smtp 发 送 邮件 客户 机 ”。 

(4) 在 MFC 应 用 程序 向 导 的 第 三 步 ,设置 高 级 功能 ,在 此 选择 Windows 套 接 字 ” 复 

(5) 在 MFC 应 用 程序 向 导 的 最 后 一 步 ,观察 生成 的 类 CSmtpClientApp 和 
CSmtpClientDlg ,然后 单 击 * 完 成 ?按钮 ,完成 应 用 程序 框架 的 创建 ,生成 SmtpClient 项 目 解 
决 方案 ,如 图 6. 10 所 示 。 项 目 中 的 Base64. h, Base64. cpp, SmtpSocket. h 和 SmtpSocket. 
cpp 由 后 续 步 又 添加 。 


2. 创建 一 个 通用 类 CBase64, 实 现 Base64 编码 和 解码 


用 MFC 添加 类 向 导 添 加 一 个 CBase64 类 的 基本 框架 ,生成 Base64. h 文件 和 Base64. 
cpp 文件 ,其 编码 .解码 的 代码 请 读者 参见 程序 6.1. 


3. 为 客户 机 对 话 框 添加 控件 ,构建 程序 主 界面 


在 资源 视图 中 展开 Dialog 资源 条 目 , 双 击 IDD_SMTPCLIENT_DIALOG ,在 工作 区 中 
会 出 现 一 个 对 话 框 ,借助 工具 箱 中 的 控件 ,将 程序 主 界面 设计 成 如 图 6. 11 所 示 的 布局 。 
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ESTER 


加 解决 方案 “SmtpClient ” (1 
s SutpCl ient 


国 Resource. h 
W) SmtpClient.h 
回 SmtpClientDlg.h 
国 SmtpSocket.h 
I stdafx.h 
lù targetver.h 
s ROLE 
€i Base64. cpp 
€3 SntpClient. cpp 
Cì SntpClientDlg. cpp 
€3 SmtpSocket. cpp 
3 stdafx. cpp 
* AR 
E Readlle. txt 


图 6.10 SMTP 客户 机 项 目 解决 方案 


根据 表 6. 5 修改 图 6. 11 所 示 的 界面 中 各 控件 的 属性 。 


图 6.11 


简易 SMTP 客户 机 主 对 话 框 界面 


表 6.5 SMTP 客户 机 程序 主 对 话 框 中 各 控件 的 属性 


控件 ID 控件 标题 控件 类 型 
IDC_EDIT_TITLE 无 编辑 框 Edit Control 
IDC_EDIT_RECEIVER 无 编辑 框 Edit Control 
IDC_EDIT_COPYTO x 编辑 框 Edit Control 
IDC_EDIT_BCC 无 编辑 框 Edit Control 
IDC_EDIT_ATTACH x 编辑 框 Edit Control 
IDC_EDIT_BODY 无 编辑 框 Edit Control 
IDC_EDIT_SMTPSERVER 无 编辑 框 Edit Control 
IDC_EDIT_SERVERPORT 无 编辑 框 Edit Control 
IDC_EDIT_SENDER 无 编辑 框 Edit Control 
IDC_EDIT_USERNAME 无 编辑 框 Edit Control 
IDC_EDIT_PASSWORD x 编辑 框 Edit Control 
IDC_BUTTON_ATTACH 浏览 按钮 Button Control 
IDC_BUTTON_SEND 发 送 邮件 按钮 Button Control 
IDC_BUTTON_CANCEL 取消 按钮 Button Control 
IDC_STATIC1 邮件 标题 : 静态 文本 Static Text 
IDC_STATIC2 收 信人 : 静态 文本 Static Text 
IDC STATIC3 ux. 静态 文本 Static Text 
IDC STATIC4 [23 静态 文本 Static Text 
IDC STATIC5 附件 : 静态 文本 Static Text 
IDC_STATIC6 邮件 正文 : 静态 文本 Static Text 
IDC_STATIC7 SMTP 服务 器 : 静态 文本 Static Text 
IDC_STATIC8 端口 : 静态 文本 Static Text 
IDC_STATIC9 发 信人 邮箱 : 静态 文本 Static Text 
IDC_STATIC10 登录 名 : 静态 文本 Static Text 
IDC_STATIC11 登录 密码 : 静态 文本 Static Text 
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4. 为 对 话 框 中 的 控件 对 象 定义 相应 的 成 员 变 量 
用 MFC 类 向 导 为 表 6. 6 中 的 控件 定义 成 员 变量 。 
表 6.6 SMTP 客户 机 程序 主 对 话 框 中 控件 的 成 员 变量 


控件 ID 对 应 成 员 变量 名 称 变量 类 型 
IDC_EDIT_TITLE m_strTitle CString 
IDC EDIT RECEIVER m strReceiver CString 
IDC EDIT COPYTO m strCopyTo CString 
IDC EDIT BCC m strBcc CString 
IDC EDIT ATTACH m strAttach CString 
IDC EDIT BODY m strBody CString 
IDC EDIT SMTPSERVER m strSmtpServer CString 
IDC EDIT SERVERPORT m nServerPort int 
IDC EDIT SENDER m strSender CString 
IDC EDIT USERNAME m strUserName CString 
IDC EDIT PASSWORD m strPassword CString 


5. 创建 从 CAsyncSocket 类 派生 的 子 类 CSmtpSocket, 处 理 与 远程 SMTP 服务 器 的 通信 


客户 机 应 创建 自己 的 套 接 字 类 ,负责 与 服务 器 的 通信 。 这 个 套 接 字 类 应 从 CAsyncSocket 
类 派生 ,并 且 能 够 将 套 接 字 事 件 传递 给 对 话 框 类 CSmtpClientDlg。 在 对 话 框 类 中 编程 者 可 
以 自 定义 套 接 字 事件 处 理 函数 ,添加 方法 请 参见 第 3 章 给 出 的 程序 3. 1 。 

MFC 类 向 导 会 自动 生成 CSmtpSocket 类 对 应 的 头 文件 ClientSocket. h 和 实现 文件 
ClientSocket. cpp ,在 图 6. 10 所 示 的 解决 方案 资源 管理 器 中 用 户 可 以 观察 到 这 个 变化 。 

使 用 MFC 类 向 导 完 善 CSmtpSocket 类 的 定义 。 在 解决 方案 资源 管理 器 中 右 击 项 目 名 
FK SmtpClient, 在 快捷 菜单 中 选择 * 类 向导” 命令 ,进入 MFC 类 向 导 , 将 类 名 称 选 择 为 
CSmtpSocket, 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 ,分 别 从 左下 角 的 “ 虚 函 数列 表 框 中 选择 
OnClose、OnConnect、OnReceive 3 个 虚 函 数 , 单 击 “ 添 加 函数 ”按钮 ,将 这 3 个 虚 函 数 添 加 到 
“已 重 写 的 虚 函 数 ” 列 表 框 中 。 这 样 ,用 户 就 为 自己 的 套 接 字 类 CSmtpSocket 完成 了 上 述 3 
个 虚 函 数 的 重 载 。 

上 述 操作 会 自动 在 头 文件 ClientSocket. h 和 实现 文件 ClientSocket. cpp 中 添加 相应 的 
代码 定义 。 其 他 操作 步骤 与 程序 3. 1 类 似 。 


6. 为 对 话 框 类 CSmtpClientDlg 中 的 控件 添加 事件 响应 函数 
其 函数 定义 请 读者 参见 表 6.7. 
表 6.7 SMTP 客户 机 程序 按钮 控件 的 事件 响应 函数 


控件 ID 消 息 成 员 函 数 (响应 函数 ) 
IDC_BUTTON_ATTACH BN_CLICKED OnClickedButtonAttach 
IDC BUTTON SEND BN CLICKED OnClickedButtonSend 


IDC BUTTON CANCEL BN CLICKED OnClickedButtonCancel 


278 


Ë 


Windows 网 络 编程 案例 教程 


上 述 操 作 仍 用 MFC 类 向 导 辅 助 完 成 。 

7. 为 CSmtpClientDIg 类 添加 成 员 变 量 初始 化 代码 

详情 参见 项 目 源 文件 清单 。 

8. 为 CSmtpClientDIg 类 添加 成 员 函 数 

详情 参见 项 目 源 文件 清单 。 

6.4.4 主要 代码 

对 于 简易 SMTP 客户 机 项 目的 源码 请 读者 参考 本 书 附带 的 课件 ,可 从 清华 大 学 出 版 社 


的 教学 资源 服务 网 上 下 载 ,这 里 只 列 出 Base64 编码 .解码 的 程序 设计 。 


程序 6.1 Base64 编码 解码 程序 
(1) Base64. h 文件 : 


# pragma once 
class CBase64 
{ 
public: 
CBase64(); 
virtual —CBase64(); 
// 方 法 
virtual void Encode(const PBYTE, DWORD); 
virtual void Decode(const PBYTE, DWORD); 
virtual void Encode(LPCTSTR sMessage) ; 
virtual void Decode(LPCTSTR sMessage); 
virtual LPSTR DecodedMessage() const; 
virtual LPSTR EncodedMessage() const; 
virtual LONG DecodedMessageSize() const; 
virtual LONG EncodedMessageSize() const; 
protected: 
// 内 部 类 
class TempBucket 
( 
public: 
BYTE nData[4]; 
BYTE nSize; 
void Clear() ( ::ZeroMemory(nData, 4); nSize = 0; ); 
}; 
// 变 量 
PBYTE m pDBuffer; 
PBYTE m pEBuffer; 
DWORD m nDBufLen; 
DWORD m nEBufLen; 
DWORD m nDDataLen; 
DWORD m nEDataLen; 
static char m DecodeTable[256]; 
static BOOL m Init; 
// 方 法 
virtual void AllocEncode(DWORD); 
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virtual void AllocDecode(DWORD); 

virtual void SetEncodeBuffer(const PBYTE pBuffer, DWORD nBufLen); 
virtual void SetDecodeBuffer(const PBYTE pBuffer, DWORD nBufLen); 
virtual void EncodeToBuffer(const TempBucket &Decode, PBYTE pBuffer); 
virtual ULONG DecodeToBuffer(const TempBucket &Decode, PBYTE pBuffer); 
virtual void EncodeRaw(TempBucket &, const TempBucket &); 

virtual void DecodeRaw(TempBucket &, const TempBucket &); 

virtual BOOL IsBadMimeChar(BYTE); 

void Init(); 


}; 
(2) Base64. cpp 文件 : 


# include "StdAfx. h" 
# include "Base64. h" 


static char Base64Digits[] = 

" ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghi jklmnopqrstuvwxyz0123456789 + /"; 
BOOL CBase64::m Init - FALSE; 

char CBase64::m DecodeTable[256]; 


# ifndef PAGESIZE 
# define PAGESIZE 4096 
# endif 


# ifndef ROUNDTOPAGE 
# define ROUNDTOPAGE(a) (((a/4096) * 1) * 4096) 
# endif 


// 构 造 函数 
CBase64::CBase64() : m pDBuffer(NULL), m pEBuffer(NULL), 
m nDBufLen(0), ^m nEBufLen(0) 
UU 
// 析 构 函 数 
CBase64: :一 CBase64() 
( 
if (m pDBuffer != NULL) 
{ 
delete [] m pDBuffer; 
m pDBuffer - NULL; 
) 


if (m pEBuffer != NULL) 
t 
delete [] m pEBuffer; 
m pEBuffer - NULL; 
) 
H 


LPSTR CBase64: :DecodedMessage() const 
t 

return (LPSTR) m pDBuffer; 

n 


LPSTR CBase64: :EncodedMessage() const 
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( 
return (LPSTR) m pEBuffer; 


) 


LONG CBase64: : DecodedMessageSize() const 
t 

return m_nDDataLen; 
) 


LONG CBase64: :EncodedMessageSize( ) const 
( 

return m nEDataLen; 
) 


void CBase64: : AllocEncode(DWORD nSize) 
{ 
if (m_nEBufLen < nSize) 
{ 
if (m pEBuffer !- NULL) delete [] m pEBuffer; 
m nEBufLen - ROUNDTOPAGE(nSize); 
m pEBuffer - new BYTE[m nEBufLen]; 
) 
::ZeroMemory(m pEBuffer, m nEBufLen); 
m nEDataLen - 0; 
) 


void CBase64: : AllocDecode(DWORD nSize) 
{ 
if (m_nDBufLen < nSize) 
{ 
if (m pDBuffer != NULL) delete [] m pDBuffer; 
m nDBufLen = ROUNDTOPAGE(nSize); 
m pDBuffer - new BYTE[m nDBufLen]; 
) 
::ZeroMemory(m pDBuffer, m nDBufLen); 
m nDDataLen 0; 
) 


void CBase64: :SetEncodeBuffer(const PBYTE pBuffer, DWORD nBufLen) 
( 

DWORD i = 0; 

AllocEncode(nBufLen); 

while(i < nBufLen) 


{ 
if (! IsBadMimeChar(pBuffer[i])) 
{ 
m pEBuffer[m nEDataLen] = pBuffer[i]; 
m nEDataLen**; 
) 
i++; 
) 
) 


void CBase64: :SetDecodeBuffer(const PBYTE pBuffer, DWORD nBufLen) 
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{ 

AllocDecode(nBufLen); 

::CopyMemory(m pDBuffer, pBuffer, nBufLen); 
m nDDataLen - nBufLen; 
) 


void CBase64: :Encode(const PBYTE pBuffer, DWORD nBufLen) 

( 

SetDecodeBuffer(pBuffer, nBufLen); 

AllocEncode(nBufLen * 2); 

TempBucket Raw; 

DWORD nIndex - 0; 

while ((nIndex * 3) «- nBufLen) 

{ 
Raw. Clear( ); 
::CopyMemory(&Raw, m pDBuffer + nIndex, 3); 
Raw.nSize = 3; 
.EncodeToBuffer(Raw, m pEBuffer + m nEDataLen); 
nIndex += 3; 
m nEDataLen += 4; 

) 


if (nBufLen > nIndex) 
{ 
Raw.Clear(); 
Raw.nSize = (BYTE) (nBufLen - nIndex); 
::CopyMemory(&Raw, m pDBuffer + nIndex, nBufLen - nIndex); 
.EncodeToBuffer(Raw, m pEBuffer + m nEDataLen); 
m nEDataLen += 4; 


void CBase64: : Encode(LPCTSTR szMessage) 
{ 
if (szMessage != NULL) 
Encode((const PBYTE)szMessage, strlen(szMessage)); 
) 


void CBase64::Decode(const PBYTE pBuffer, DWORD dwBufLen) 


{ 
if (!CBase64::m Init) Init(); 


SetEncodeBuffer(pBuffer, dwBufLen); 
AllocDecode(dwBufLen); 


TempBucket Raw; 
DWORD nIndex - 0; 
while((nIndex + 4) <= m nEDataLen) 
{ 

Raw.Clear(); 

Raw.nData[0] - 

CBase64::m DecodeTable[m pEBuffer[nIndex]]; 

Raw.nData[1] - CBase64::m DecodeTable[m pEBuffer[nIndex * 1]]; 
Raw.nData[2] = CBase64::m DecodeTable[m pEBuffer[nIndex + 2]]; 
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Raw.nData[3] = CBase64::m DecodeTable[m pEBuffer[nIndex + 3]]; 


if (Raw.nData[2] 
if (Raw.nData[3] 


255) Raw. nData[2] 
255) Raw. nData[3] 


0; 
0; 


Raw.nSize = 4; 

.DecodeToBuffer(Raw, m pDBuffer + m nDDataLen); 
nIndex += 4; 

m nDDataLen += 3; 


if (nIndex « m nEDataLen) 
{ 
Raw.Clear(); 
for (DWORD i= nIndex; i«m nEDataLen; i++) 
t 
Raw.nData[i - nIndex] = 
CBase64::m DecodeTable[m pEBuffer[i]]; 
Raw. nSize++ ; 
if(Raw.nData[i — nIndex] == 255) 
Raw.nData[i - nIndex] = 0; 


.DecodeToBuffer(Raw, m pDBuffer + m nDDataLen); 
m nDDataLen += (m nEDataLen - nIndex); 


void CBase64: : Decode(LPCTSTR szMessage) 
{ 
if (szMessage != NULL) 
Decode( (const PBYTE)szMessage, strlen(szMessage)); 


} 


DWORD CBase64:: DecodeToBuffer(const TempBucket &Decode, PBYTE pBuffer) 
{ 
TempBucket Data; 
DWORD nCount = 0; 
.DecodeRaw(Data, Decode); 
for (int i=0; i«3; i++) 
{ 
pBuffer[i] = Data.nData[i]; 
if(pBuffer[i] != 255) nCount++; 
) 
return nCount; 


) 


void CBase64:: EncodeToBuffer(const TempBucket &Decode, PBYTE pBuffer) 
( 

TempBucket Data; 

.EncodeRaw(Data, Decode); 

for (inti-0; i<4; i++) 


pBuffer[i] = Base64Digits[Data. nData[i]]; 


Switch (Decode. nSize) 
{ 


case 1: 

pBuffer[2] = '='; 
case 2: 

pBuffer[3] = '='; 
} 
i 


void CBase64: :_DecodeRaw(TempBucket &Data, const TempBucket &Decode) 


{ 
BYTE nTemp; 


Data. nData[0] = Decode. nData[0]; 
Data. nData[0] <<= 2; 


nTemp = Decode. nData[ 1]; 
nTemp >>= 4; 
nTemp &- 0x03; 
Data.nData[0] | = nTemp; 


Data.nData[1] = Decode.nData[1]; 
Data.nData[1] <<= 4; 


nTemp = Decode. nData[2]; 
nTemp >>= 2; 
nTemp &= OxOF; 
Data. nData[1] | = nTemp; 


Data. nData[2] = Decode. nData[2]; 
Data. nData[2] <<= 6; 

nTemp = Decode. nData[3]; 

nTemp &= Ox3F; 
Data.nData[2] | = nTemp; 


void CBase64:: EncodeRaw(TempBucket &Data, const TempBucket &Decode) 


{ 
BYTE nTemp; 


Data. nData[0] = Decode.nData[0]; 
Data. nData[0] >= 2; 


Data.nData[1] = Decode.nData[0]; 
Data.nData[1] <<= 4; 

nTemp = Decode. nData[1]; 

nTemp >>= 4; 

Data. nData[1] | = nTemp; 

Data. nData[1] &= Ox3F; 
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Data. nData[2] = Decode.nData[1]; 
Data. nData[2] <<= 2; 


nTemp = Decode. nData[2]; 
nTemp >>= 6; 


Data. nData[2] | = nTemp; 
Data.nData[2] &= Ox3F; 


Data.nData[3] = Decode. nData[2]; 
Data.nData[3] &= Ox3F; 
) 


BOOL CBase64:: IsBadMimeChar(BYTE nData) 
{ 
switch(nData) 
{ 
case '\r': case '\n': case '\t': case '': 
case '\b': case '\a': case '\f': case '\v': 
return TRUE; 
default: 
return FALSE; 
} 
} 


void CBase64::_Init() 
{ 
// 初 始 化 解码 表 
int i; 
for (i20; i«256; i++) 
CBase64::m DecodeTable[i] = - 2; 


for (i20; i«64; i++) 
{ 
CBase64: :m_DecodeTable[Base64Digits[i]] = (char) i; 
CBase64::m DecodeTable[Base64Digits[i]|0x80] = (char) i; 
) 


CBase64::m DecodeTable['- '] = -1; 
CBase64::m DecodeTable['- '|0x80] = -1; 
CBase64::m Init - TRUE; 

) 


6.4.5 项 目测 试 


编译 运行 SMTP 客户 机 程序 ,其 初始 运行 界面 如 图 6. 9 Bros ,输入 登录 名 、 登 录 密 码 、 
收 信人 ,邮件 标题 和 邮件 正文 ,并 附加 一 个 Word 文档 作为 附件 ,如 图 6. 12 所 示 。 然 后 单 击 
“发 送 邮件 ?按钮 ,完成 后 打开 搜狐 上 的 邮箱 yantaidxz@ sohu. com 进行 查看 ,确认 邮件 已 经 
收 到 。 
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É Smtp 发 送 邮 件 客户 机 


SMTP 服 务 器 : 5D-163.com 


mn: [5 
发 信人 邮箱 : [sunm20080163.com 


səs: [sunmy20088163.co 


J L.S epar: [sunmy20080163.com 


ED RERZAER. WA? 


图 6.12 发 送 邮件 测试 


6.5 POP3 协议 编程 实例 


本 节 根 据 POP3 协议 原理 ,实现 一 个 简易 的 POP3 客户 机 程序 ,用 户 使 用 这 个 简易 程序 
能 够 从 自己 的 邮箱 里 收取 电子 邮件 。 


6.5.1 POP3 客户 机 工作 模型 


为 了 说 明 用 户 收取 电子 邮件 的 过 程 ,假定 用 户 在 搜狐 邮件 服务 器 上 注册 了 邮箱 
yantaidxz@ sohu. com, 服 务 器 地 址 为 pop3. sohu. com, 收 取 邮 件 的 工作 过 程 如 图 6. 13 所 
示 。 在 此 以 从 搜狐 邮箱 收取 邮件 为 例 ,其 接收 过 程 大 致 经 历 验 证 .处 理 和 更 新 3 个 状态 ,分 
为 以 下 3 个 步骤 。 

第 12b. 用 户 启 动 简易 POP3 收 件 程 序 ( 类 似 Outlook Express, Foxmail 客户 程序 ) , 填 
写 收 件 人 信息 和 服务 器 信息 以 登录 服务 器 ,进入 验证 状态 。 

第 2 步 :成功 登录 服务 器 后 ,进入 处 理 状 态 ,客户 程序 与 pop3. sohu. com 服务 器 通过 若 
干 POP3 命令 交互 应 答 ,实现 邮件 的 传递 ,邮件 被 下 载 到 客户 端 。 

第 3 步 : 完成 邮件 接收 后 ,客户 机 向 POP3 发 送 QUIT 命令 ,结束 POP3 会 话 , 进 入 更 
新 状态 ,如 果 设 置 了 删除 邮箱 中 的 邮件 ,此 时 会 将 邮件 删除 。 至 此 ,接收 邮件 的 工作 全 部 


完成 。 


简易 POP3 接 收 邮件 程序 [< -一 一 一 POP3 会 话 — - — — =] pop3.sohu.com 


yantaidxz@sohu.com 


图 6.13 POP3 客户 机 接收 邮件 工作 模型 
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6.5.2 功能 和 技术 要 点 


本 例 实现 的 简易 接收 邮件 程序 的 初始 运行 界面 如 图 6. 14 所 示 。 在 输入 POP3 服务 器 、 
登录 邮箱 ,密码 之 后 , 单 击 “ 连 接 并 收取 邮件 ”按钮 ,客户 机 程序 会 经 历 验 证 、 处 理 和 更 新 3 个 
状态 最 终 完成 与 POP3 服务 器 的 会 话 。 


& Pop3 客 户 机 


pomaga: [posson — amam [aade ma: — r M 


6.14 简易 POP3 客户 机 运行 的 初始 界面 


简易 接收 邮件 程序 的 技术 要 点 如 下 : 

(D 运用 VS2010 创建 POP3 客户 机 项 目 , 理 解 MFC 编程 框架 。 

(2) 从 CAsyncSocket 类 派生 自己 的 MFC 套 接 字 类 ,实现 网 络 的 POP3 会 话 。 

(3) 理解 派生 的 CPop3ClientSocket 类 与 MFC 框架 的 关系 ,灵活 运用 Windows 消息 驱 
动机 制 。 

(4) 理解 POP3 会 话 的 过 程 状态 。 


6.5.3 项 目 创建 步 又 
该 项 目的 创建 步骤 与 SMTP 客户 机 的 创建 步骤 类 似 , 下 面 进行 简要 介绍 。 
1. 使 用 MFC 应 用 程序 向 导 创 建 客户 机 程序 框架 


启动 VS2010 ,选择 "文件 一 新 建 一 项 目 ” 命 令 , 弹 出 “新建 项 目 " 对 话 框 , 设 定 模板 为 
MFC, i H XW J“ MFC 应 用 程序 ”, 项 目 名 称 、 解 决 方案 名 称 为 Pop3Client, 并 指定 项 目 保 
存 位 置 ,然后 单 击 “ 确 定 ” 按 钮 ,进入 MFC 应 用 程序 向 导 。 将 应 用 程序 类 型 设 定 为 “基于 对 
话 框 >, 设 置 对 话 框 标题 为 "POP3 客户 机 ”并 选择 “Windows 套 接 字 ” 复 选 框 ,最 后 会 自动 生 
成 CPop3ClientApp 和 CPop3ClientDlg 的 类 框架 。 


2. 为 客户 机 对 话 框 添加 控件 ,构建 程序 主 界面 


Pq 
* 


在 资源 视图 中 展开 Dialog 资源 条 目 ,双击 IDD. POP3CLIENT. DIALOG. ,在 工作 
会 出 现 一 个 对 话 框 ,借助 工具 箱 中 的 控件 ,将 程序 主 界面 设计 成 如 图 6. 14 所 示 的 布局 。 


$8569: — SMTP/POP3 4 


根据 表 6. 8 修改 图 6. 14 所 示 的 界面 中 各 控件 的 属性 。 


表 6.8 POP3 客户 机 程序 主 对 话 框 中 控件 的 属性 


控件 ID 控件 标题 控件 类 型 
IDC_EDIT_SERVERNAME 无 编辑 框 Edit Control 
IDC_EDIT_MAILBOX 无 编辑 框 Edit Control 
IDC_EDIT_PASSWORD 无 编辑 框 Edit Control 
IDC COMBO TITLE 无 编辑 框 Edit Control 
IDC_RICHEDIT_MAILCONTENT 无 编辑 框 RichEdit2. 0 Control 
IDC_CHECK_DELMAIL 删除 邮件 复 选 框 Check Box 
IDC_BUTTON_CONNECT 连接 并 收取 邮件 按钮 Button Control 
IDC_BUTTON_DISCONNECT 断 开 连接 按钮 Button Control 
IDC_BUTTON_BROWSEMAIL 查看 邮件 按钮 Button Control 
IDC_BUTTON_SAVEMAIL 保存 邮件 按钮 Button Control 
IDC_STATIC1 POP3 服务 器 : 静态 文本 Static Text 
IDC_STATIC2 登录 邮箱 : 静态 文本 Static Text 
IDC_STATIC3 密码 : 静态 文本 Static Text 
IDC_STATIC4 邮件 标题 静态 文本 Static Text 
IDC_STATIC5 原始 邮件 信息 ， 静态 文本 Static Text 


3. 为 对 话 框 中 的 控件 对 象 定义 相应 的 成 员 变 量 
用 MFC 类 向 导 为 表 6.9 中 的 控件 定义 成 员 变量 。 


表 6.9 POP3 客户 机 程序 主 对 话 框 中 控件 的 成 员 变量 


控件 ID 对 应 成 员 变量 名 称 变量 类 型 
IDC_EDIT_SERVERNAME m_strServerName CString 
IDC_EDIT_MAILBOX m_strMailBox CString 
IDC_EDIT_PASSWORD m strPassword CString 
IDC COMBO TITLE m comboTitle CComboBox 
IDC RICHEDIT MAILCONTENT m MailContent CRichEditCtrl 
IDC CHECK DELMAIL m bDelMail BOOL 

m maillnfo CString 


4. 创建 从 CAsyncSocket 类 派生 的 子 类 CPop3ClientSocket . &h 38 5j iz $$ POP3 服务 器 


的 通信 


客户 机 应 创建 自己 的 套 接 字 类 ,负责 与 服务 器 的 通信 。 这 个 套 接 字 类 应 从 CAsyncSocket 


类 派生 ,并 且 能 够 
以 自 定义 套 接 字 王 
MFC 向 导 会 


将 套 接 字 事 件 传 递 给 对 话 框 类 CPop3ClientDlg, 在 对 话 框 类 中 编程 者 可 
有 件 处 理 函 数 。 
自动 生成 CPop3ClientSocket 类 对 应 的 头 文件 Pop3ClientSocket. h 和 实 


现 文件 Pop3ClientSocket. cpp。 
使 用 MFC 类 向 导 完善 CPop3ClientSocket 类 的 定义 。 在 解决 方案 资源 管理 器 中 右 击 
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项 目 名 称 Pop3Client, 在 快捷 菜单 中 选择 “类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 将 类 名 称 选择 
为 CPop3ClientSocket, 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 , 分 别 从 左下 角 的 “ 虚 函 数 ” 列 表 框 中 选 
择 OnClose, OnConnect, OnReceive 3 个 虚 函 数 , 单 击 * 添 加 函数 ?按钮 ,将 这 3 个 虚 函 数 添 加 
到 “已 重 写 的 虚 函 数列 表 杠 中。 这样 ,用 户 就 为 自己 的 套 接 字 类 CPop3ClientSocket 完成 
了 对 上 述 3 个 虚 函 数 的 重 载 。 

上 述 操 作 会 自动 在 头 文件 Pop3ClientSocket. h 和 实现 文件 Pop3ClientSocket. cpp 中 添 
加 相应 的 代码 定义 。 


5. 为 对 话 框 类 CPop3ClientDlg 中 的 控件 添加 事件 响应 函数 
其 函数 定义 请 读者 参见 表 6. 10。 
表 6.10 POP3 客户 机 程序 按钮 控件 的 事件 响应 函数 


控件 ID 消息 成 员 函 数 (响应 函数 ) 
IDC_BUTTON_CONNECT BN_CLICKED OnClickedButtonConnect 
IDC BUTTON DISCONNECT BN CLICKED OnClickedButtonDisconnect 
IDC BUTTON BROWSEMAIL BN CLICKED OnClickedButtonBrowsemail 
IDC BUTTON SAVEMAIL BN CLICKED OnClickedButtonSavemail 


上 述 操作 仍 用 MFC 类 向 导 辅 助 完成 。 

6. 为 CPop3ClientDlg 类 添加 成 员 变 量 初始 化 代码 ,为 CPop3ClientDlg 类 添加 成 员 函 数 
详情 参见 本 书 课件 中 的 程序 6. 2。 

6.5.4 项 目测 试 


该 项 目 编译 运行 的 初始 界面 如 图 6. 14 所 示 ,测试 后 的 结果 界面 如 图 6. 15 所 示 ,测试 数 
据 如 下 : 


É Pop3& P Bl 


POP3 服 务 器 : [0003.163.com paga :|happy ash 163 密码 :|qazwsx r ama 


mem 0: Subject: =70bK787x9elnH7xpq+0C/L5CGFBGMIAXNB/EYNXQWS3 v 
BHASHRB : 


[CERES osa. 163. con. 
POE Welcome to coremail Mail Pop3 Server (I63cons[B2bT26e-03«9Me3e0a2 £154. 
[OK core mail 


(REPERA: FE 
[nuslisg 4 retrllsg =1 信 件 号 0- ,信件 大 小 19， 信 件 内 容 : +0K 30562 octets 
fnm 


[Ok 38582 octets 
—— A EU AAS: Received: fron n20 


vice. netease con) 


teare. com> 
Ralla E ATRD TEOST 因 


6.15 收取 指定 邮箱 中 的 邮件 


第 6 章 ”SMTP/P0P3 编 程 


指定 访问 的 POP3 服务 器 为 pop. 163. com, 登 录 邮 箱 为 happy_flash@163. com, 密 码 为 
qazwsc, 不 选择 “删除 邮件 " 复 选 框 , 单 击 “ 连 接 并 收取 邮件 ”按钮 , 取 回 的 邮件 在 列表 框 中 显 
示 。 为 了 简化 编程 , 取 回 的 邮件 没有 用 Base64 解码 器 解码 。 读 者 可 以 参照 程序 6. 1 中 的 
Base64 编码 .解码 器 对 本 例 程序 进行 再 设计 。 


E 


l. 简 述 电子 邮件 系统 的 构成 。 

2. 日 常生 活 中 的 收发 邮件 ,一 种 是 用 Outlook Express, Foxmail 等 客户 机 程序 ,一 种 是 
用 Web 方式 直接 登录 邮箱 页 面 ,比较 这 两 种 收发 邮件 的 异同 。 

3. 简 述 SMTP 协议 的 主要 内 容 。 
. 简 述 POP3 协议 的 主要 内 容 。 
. 查阅 资料 , 简 述 IMAP4 协议 的 主要 内 容 。POP3 与 IMAP4 有 何不 同 ? 
. 为 本 章 给 出 的 接收 邮件 程序 增加 解码 和 分 离 附件 的 功能 。 
. 基于 MFC 的 文档 /视图 程序 框架 编写 一 个 类 似 Outlook Express 或 Foxmail 的 收发 
邮件 客户 机 程序 。 
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Windows 操作 系统 是 一 个 多 任务 操作 系统 ,以 多 进程 形式 ,允许 多 个 任务 同时 运行 ; 以 
多 线程 形式 ,允许 单个 任务 分 成 不 同 的 部 分 运行 ; 并 以 协调 机 制 ,一 方面 防止 进程 与 进程 、 
线程 与 线程 产生 冲突 , 另 一 方面 允许 进程 与 进程 .线程 与 线程 共享 资源 。 在 单 CPU REL, 
单 CPU 多 核 或 多 CPU 的 计算 机 上 运行 多 线程 程序 ,把 进程 中 负责 1/0 处 理 和 人 机 交互 这 
类 易 发 生 阻 塞 的 模块 与 那些 密集 计算 的 模块 分 在 不 同 的 线程 ,能 大 幅度 提高 程序 的 执行 
效率 。 


6.1 进程 与 线程 


一 个 程序 (Program) 至少 有 一 个 进程 (Process) ,一 个 进程 至 少 有 一 个 线程 (Thread)。 
线程 是 进程 的 一 个 实体 ,是 进程 内 部 的 一 个 执行 单元 , 操作 系统 创建 好 进程 后 ,实际 上 就 执 
行 了 该 进程 的 主 执行 线程 。 每 个 进程 有 一 个 主 执行 线程 , 它 不 需要 用 户主 动 创建 ,是 由 操作 
系统 自动 创建 的 。 


7.1.1 进程 与 线程 的 关系 


进程 是 一 个 正在 执行 的 程序 ,用 户 可 以 从 以 下 两 点 理解 进程 的 概念 : 

第 一 ,进程 是 一 个 实体 。 每 一 个 进程 都 有 它 自 己 的 地 址 空间 ,一 般 情 况 下 ,包括 文本 区 
域 (Text Region) .数据 区 域 (Data Region) 和 堆栈 区 域 (Stack Region)。 文 本 区 域 存储 处 理 
器 执行 的 代码 ; 数据 区 域 存储 变量 ; 堆栈 区 域 存储 进程 调用 的 指令 和 本 地 变量 。 第 二 , 进 
程 是 一 个 “执行 中 的 程序 ”。 程 序 是 一 个 没有 生命 的 实体 ,只 有 处 理 器 赋予 程序 生命 时 , 它 才 
能 成 为 一 个 活动 的 实体 ,才能 称 为 进程 。 

线程 是 操作 系统 能 够 进行 运算 调度 的 最 小 单位 , 它 被 包含 进程 
在 进程 之 中 ,是 进程 中 的 实际 运作 单位 。 一 个 进程 可 以 有 多 条 
线程 ,每 条 线程 并 行 执行 不 同 的 任务 。 

对 于 进程 和 线程 之 间 的 关系 ,简单 来 说 ,进程 是 线程 的 容 
器 ,如 图 7. 1 所 示 , 线 程 只 能 在 进程 内 部 活动 。 

同一 进程 中 的 多 条 线程 共享 该 进程 中 的 所 有 系统 资源 ,如 
虚拟 地 址 空间 、 文 件 描述 符 和 信号 处 理 等 。 同 一 进程 中 的 多 个 
线程 又 有 各 自 的 调用 栈 (Call Stack), 自己 的 寄存 器 环境 图 7.1 进程 是 线程 的 容器 


线程 可 — 线程 机 
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(Register Context) ,自己 的 线程 本 地 存储 (Thread-Local Storage) 。 进 程 与 线程 的 工作 关系 
如 图 7.2 所 示 。 


Code Data | Files Code Data Files 


Registers Stack Registers|| | Registers| || Registers 
Stack Stack Stack 


线程 一 一 


线程 上 线程 #2 | 线程 要 


单线 程 多 线程 


图 7.2 进程 和 线程 的 工作 关系 


线程 和 进程 如 何 工作 呢 ? 如 果 将 进程 比 作 工 厂 的 车 间 , 它 代表 CPU 所 能 处 理 的 单个 
任务 , 任 一 时 刻 ,CPU 总 是 运行 一 个 进程 ,其 他 进程 处 于 非 运 行 状态 。 在 一 个 车 间 里 ,可 以 
有 很 多 工人 ,他 们 共同 完成 一 个 任务 。 线 程 就 好 比 车 间 里 的 工人 ,一 个 进程 可 以 包括 多 个 

车 间 的 空间 是 工人 们 共享 的 ,例如 许多 房间 是 每 个 工人 都 可 以 进出 的 ,这 象征 着 一 个 进 
程 的 内 存 空间 是 共享 的 ,每 个 线程 都 可 以 使 用 这 些 共享 内 存 。 

但 是 房间 的 作用 不 同 , 有 些 房间 只 允许 容纳 一 个 人 ,例如 休息 室 , 当 里 面 有 人 的 时 候 ,其 
他 人 就 不 能 进去 了 。 这 代表 一 个 线程 使 用 某 些 共享 内 存 时 ,其 他 线程 必须 等 它 使 用 结束 才 
能 使 用 这 一 块 内 存 。 一 个 防止 他 人 进入 的 简单 方法 就 是 在 门口 挂 一 把 锁 , 先 到 的 人 锁 上 门 ， 
后 到 的 人 看 到 上 锁 , 就 在 门口 排队 等 候 , 等 锁 打 开 再 进去 ,这 种 做 法 称 为 “ 互 斥 锁 ”(Mutual 
exclusion, Mutex) ,用 于 防止 多 个 线程 同时 读 / 写 某 一 块 内 存 区 域 。 

还 有 一 些 房间 ,可 以 同时 容纳 N 个 人 ,例如 更 衣 室 。 如 果 人 数 大 于 N, 多 出 来 的 人 只 能 
在 外 面 等 着 ,这 好 比 某 些 内 存 区 域 ,只 能 供 固定 数目 的 线程 使 用 。 

此 时 的 解决 方法 是 在 门口 挂 N 把 钥匙 ,进去 的 人 取 一 把 钥匙 ,出 来 时 再 把 钥匙 挂 回 原 
处 。 后 到 的 人 发 现 钥匙 架空 了 ,就 知道 必须 在 门口 排队 等 候 。 这 种 做 法 称 为 “信号 量 ” 
(Semaphore) ,用 来 保证 多 个 线程 不 会 相互 冲突 。 

用 户 不 难看 出 ,Mutex 是 Semaphore 的 一 种 特殊 情况 (N 二 1 时 ) ,完全 可 以 用 后 者 代替 
前 者 。 但 因 Mutex 较为 简单 .效率 高 ,在 需要 保证 资源 独占 时 ,采用 Mutex 这 种 设计 比 
较 好 。 


7.1.2 Windows 进程 的 内 存 结构 
观察 程序 7. 1 的 运行 结果 ,可 以 较 好 地 理解 进程 的 内 存 结构 。 
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程序 7.1 打印 变量 的 内 存 地 址 


# include < stdio.h» 
int gl =0, g2=0, g3 = 0; 
int main() 

{ 

static int sl = 0, s2 = 0, s3 = 0; 
int vl = 0, v2 = 0, v3 = 0; 

// 打 印 出 各 个 变量 的 内 存 地 址 
printf("Ox $ x\n", &v1); 
printf("0x% x\n", &v2); 
Printf("0xg% x\n\n", &v3); 
printf("Ox $ x\n", &g1); 
printf("0x% x\n", &g2); 
printf("O0x% x\n\n", &g3); 
printf("0x% x\n", &s1); 
printf("Ox $ x\n", &s2); 
printf("0x% x\n\n", &s3); 
return 0; 

} 


用 VC 编译 运行 的 结果 如 下 : 


0x0012ff78 
0x0012ff7c 
0x0012ff80 
0x004068d0 
0x004068d4 
0x004068d8 
0x004068dc 
0x004068e0 
0x004068e4 


// 打 印 各 本 地 变量 的 内 存 地 址 


// 打 印 各 全 局 变量 的 内 存 地 址 


// 打 印 各 静态 变量 的 内 存 地 址 


输出 结果 是 程序 中 定义 的 各 类 变量 的 内 存 地 址 ,其 中 ,v1、v2、v3 是 本 地 变量 ,gl 、g2、g3 
是 全 局 变量 ,sl、s2、s3 是 静态 变量 。 用 户 可 以 看 到 同 种 类 型 变量 分 配 的 内 存 是 连续 的 ,但 
是 本 地 变量 和 全 局 变量 分 配 的 内 存 地 址 相差 甚 远 ,而 全 局 变量 和 静态 变量 分 配 的 内 存 又 是 


连续 的 。 


造成 变量 分 类 存储 的 原因 与 进程 的 内 存 组 织 结构 有 关 。 对 于 一 个 进程 的 内 存 空间 而 


言 ,可 以 在 逻辑 上 分 为 3 个 部 分 , 即 代码 区 、 静 态 数据 区 和 上 


动态 数据 区 ,如 图 7. 3 所 示 。 | - 


堆栈 动态 数据 区 包括 “ 栈 ”(Stack) 和 “ 堆 ”(Heap) 两 种 | 
结构 , 栈 是 一 种 线性 结构 , 堆 是 一 种 链 式 结构 。 本 地 变量 是 上 


存储 在 动态 数据 区 中 的 ,进程 的 每 个 线程 都 有 私有 的 “ 栈 ”，'! 


所 以 每 个 线程 的 本 地 变量 互 不 干扰 。 i 
全 局 变量 和 静态 变量 分 配 在 静态 数据 区 中 ,与 本 地 变 r 
量 所 在 的 动态 数据 区 完全 不 同 , 这 样 就 解释 了 程序 7.1 输 上 


出 的 变量 地 址 不 连续 的 原因 。 程 序 7. 1 只 包括 一 个 主线 | U 


程 ,独占 整个 进程 资源 。 如 果 是 多 线程 ,利用 进程 静态 数据 
区 中 的 全 局 变量 ,线程 间 很 容易 实现 数据 共享 和 相互 通信 。 


RI EE 低 端 内 存 区 域 
| 

动态 数据 区 
| 

代码 区 | 

静态 数据 区 | 
| 

--------- 高 端 内 存 区 域 


7.3 进程 的 内 存 结构 
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7.1.3 Windows 线程 的 优先 级 
Windows 是 一 个 抢先 式 多 任务 系统 ,线程 的 执行 顺序 与 线程 优先 级 、 进 程 优先 级 相关 。 
1. Windows 定义 了 三 类 优先 级 


操作 系统 给 每 个 线程 分 配 一 个 优先 级 ,优先 级 从 0( 最 低 优先 级 ) 到 31( 最 高 优先 级 ) 之 
间 变 化 。0 表示 系统 优先 级 为 最 低 优先 级 , 仅 用 于 零 页 线程 ( 零 页 线程 用 于 对 系统 中 的 空闲 
物理 页 面 清 零 )。1 一 15 为 动态 优先 级 ,线程 的 优先 级 可 在 此 范围 内 进行 调整 。16 一 31 为 实 
时 优先 级 ,用 于 执行 一 些 实 时 处 理 任务 。 


2. 线程 是 全 局 调度 的 


Windows 的 线程 调度 策略 是 面向 线程 的 ,而 不 是 面向 进程 的 。 下 面 举 一 个 理想 状态 的 
例子 来 说 明 Windows 对 线程 是 全 局 调度 的 。 

进程 A 有 8 个 可 运行 的 线程 ,进程 B 有 两 个 可 运行 的 线程 ,这 10 个 线程 的 优先 级 相 
同 。 那 么 ,每 一 个 线程 将 会 占用 1/10 的 CPU 时 间 ,而 不 是 将 50% 的 CPU 时 间 分 配给 进程 
A ME 5076 f ER] r BC A6 JEFE B。 


3. 线程 的 执行 顺序 


Windows 为 每 个 优先 级 的 线程 都 准备 了 优先 级 队列 ,同一 优先 级 的 线程 按时 间 片 
(Time Slice) 轮 转 进 行 调度 ,多 处 理 器 可 以 多 线程 并 行 。 

因为 Windows 实现 的 是 一 种 抢占 式 的 调度 ,如 果 一 个 线程 未 完成 其 时 间 片 而 有 另 一 个 
优先 级 更 高 的 线程 就 绪 ,正在 运行 的 这 个 线程 可 能 在 未 完成 其 时 间 片 时 被 取代 。 

以 下 事件 发 生 时 会 触发 Windows 线程 调度 ; 

(1) 变 成 就 绪 状 态 的 线程 ; 

(2) 因 时 间 片 结束 而 离开 运行 状态 的 线程 

(3) 线程 的 优先 级 改变 。 

线程 优先 级 由 以 下 两 方面 因素 决定 : 

(1) 线程 所 处 进程 的 优先 级 , 即 进程 优先 级 ; 

(2) 线程 在 进程 内 部 的 相对 优先 级 , 即 线程 优先 级 。 


4. 进程 优先 级 


Windows 定义 的 进程 优先 级 包括 以 下 6 种 : 

。 IDLE_PRIORITY_CLASS 

BELOW NORMAL PRIORITY CLASS 

NORMAL PRIORITY CLASS 

ABOVE NORMAL PRIORITY CLASS 

HIGH. PRIORITY CLASS 

* REALTIME PRIORITY CLASS 

进程 创建 后 ,进程 的 默认 优先 级 为 NORMAL PRIORITY CLASS, 
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5. 线程 优先 级 


用 户 编程 中 讨论 的 线程 优先 级 包括 以 下 7 种 ,这 7 种 优先 级 都 是 相对 同一 进程 而 言 的 。 
* THREAD PRIORITY IDLE 
* THREAD PRIORITY LOWEST 
* THREAD PRIORITY BELOW NORMAL 
* THREAD PRIORITY NORMAL 
* THREAD PRIORITY ABOVE NORMAL 
* THREAD PRIORITY HIGHEST 
* THREAD PRIORITY TIME CRITICAL 
线程 创建 后 ,线程 的 默认 优先 级 为 THREAD_PRIORITY_NORMAL。 用 户 可 以 使 用 
SetThreadPriority 函数 调整 它 的 优先 级 别 ,以 区 别 同 一 进程 中 的 其 他 线程 。 一 种 典型 的 设 
置 策略 是 将 界面 线程 的 优先 级 设置 为 THREAD_PRIORITY_ABOVE_NORMAL 或 
THREAD_PRIORITY_HIGHEST, 以 保证 进程 更 好 地 响应 用 户 的 操作 ; 将 工作 线程 (后 台 
线程 ) 的 优先 级 设置 为 THREAD. PRIORITY BELOW |. NORMAL 或 者 THREAD_ 
PRIORITY_LOWEST, 可 以 使 用 GetThreadPriority 函数 获取 线程 优先 级 。 
6. 线程 全 局 优先 级 
在 一 般 的 程序 设计 中 ,程序 员 只 关注 线程 在 进程 内 部 定义 的 7 个 优先 级 就 够 了 。 但 
Windows 对 线程 的 调度 是 全 局 性 的 , 即 打 破 了 进程 的 界限 。 线 程 优先 级 的 全 局 排序 是 根据 
它 所 处 的 进程 优先 级 和 进程 内 的 相对 优先 级 综合 决定 的 ,新 计算 出 来 的 线程 优先 级 可 以 视 
作 绝 对 优先 级 ,或 称 全 局 优先 级 。 
表 7.1 给 出 了 进程 优先 级 和 线程 相对 优先 级 综合 平衡 后 得 到 的 线程 全 局 优先 级 ,这 为 
程序 员 设 定 线程 优先 级 指明 了 方向 , 正 是 一 表 在 手 , 全 局 在 胸 。 
表 7.1 线程 全 局 优先 级 
进程 优先 级 线程 优先 级 全 局 优先 级 


THREAD PRIORITY IDLE 1 
THREAD PRIORITY LOWEST 2 

THREAD PRIORITY BELOW NORMAL 3 

IDLE, PRIORITY CLASS THREAD PRIORITY NORMAL 4 
5 

6 


THREAD_PRIORITY_ABOVE_NORMAL 
THREAD_PRIORITY_HIGHEST 
THREAD PRIORITY TIME CRITICAL 15 


THREAD PRIORITY IDLE 1 

THREAD PRIORITY LOWEST 4 

THREAD PRIORITY BELOW NORMAL 5 

BELOW NORMAL PRIORITY CLASS | THREAD PRIORITY NORMAL 6 
7 

8 


THREAD PRIORITY ABOVE NORMAL 
THREAD PRIORITY HIGHEST 
THREAD PRIORITY TIME CRITICAL 15 


进程 优先 级 


线程 优先 级 


NORMAL_PRIORITY_CLASS 


THREAD PRIORITY IDLE 


THREAD PRIORITY LOWEST 


THREAD PRIORITY BELOW NORMAL 


THREAD PRIORITY NORMAL 


THREAD PRIORITY ABOVE NORMAL 


THREAD PRIORITY HIGHEST 


THREAD PRIORITY TIME CRITICAL 


ABOVE NORMAL PRIORITY CLASS 


THREAD PRIORITY IDLE 


THREAD PRIORITY LOWEST 


THREAD PRIORITY BELOW NORMAL 


THREAD PRIORITY NORMAL 


THREAD PRIORITY ABOVE NORMAL 


THREAD PRIORITY HIGHEST 


THREAD PRIORITY TIME CRITICAL 


HIGH. PRIORITY CLASS 


THREAD PRIORITY IDLE 


THREAD PRIORITY LOWEST 


THREAD PRIORITY BELOW NORMAL 


THREAD PRIORITY NORMAL 


THREAD PRIORITY ABOVE NORMAL 


THREAD PRIORITY HIGHEST 


THREAD PRIORITY TIME CRITICAL 


REALTIME PRIORITY CLASS 


THREAD PRIORITY IDLE 


THREAD PRIORITY LOWEST 


THREAD PRIORITY BELOW NORMAL 


THREAD PRIORITY NORMAL 


THREAD PRIORITY ABOVE NORMAL 


THREAD PRIORITY HIGHEST 


THREAD PRIORITY TIME CRITICAL 


E 用 C 和 Win32 API 编写 多 线程 


Visual C++ 支持 在 Windows 平台 上 创建 多 线程 应 用 程序 ,如 果 应 用 程序 需要 管理 多 个 
活动 (如 同时 进行 键盘 和 鼠标 输入 ) , 则 应 考虑 使 用 多 线程 。 例 如 ,一 个 线程 可 以 处 理 键盘 输 
入 ,而 另 一 个 线程 可 以 筛选 鼠标 活动 ,第 3 个 线程 可 以 根据 鼠标 和 键盘 线程 的 数据 更 新 显示 


屏幕 ,同时 其 他 线程 可 以 访问 磁盘 文件 或 从 通信 端口 获取 数据 。 


Visual C++ 的 多 线程 编程 可 以 使 用 两 种 模式 ,一 种 基于 Microsoft 基础 类 库 (MFC) , 另 
一 种 基于 C 运行 时 库 (C Run-Time Library. CRT) RI Win32 API。 本 节 介 绍 如何 使 用 C 运 


行 时 库 CCRT) 和 Win32 API 创建 线程 。 
在 Visual C++ 中 创建 线程 的 函数 有 以 下 4 种 : 
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* CreateThread() 

* _beginthread() &.&. beginthreadex() 

* AfxBeginThread() 

。 CWinThread 类 

其 中 ,前 两 种 分 别 适用 于 Win32 API 和 C 运行 时 库 (CRT), 后 两 种 适用 于 MFC, 

用 C 或 C++ 编 程 ,main 函数 或 wmain K% Unicode 版 本 ) 是 程序 人 口 函 数 , 用 Win32 
API 编程 , WinMain 3X wWinMain 是 程序 人 口 函 数 。 程 序 开 始 运 行 后 ,操作 系统 为 进程 自 
动 创建 第 一 个 线程 ,入 口 函 数 即 为 主线 程 函数 。 


7.2.1 Win32 API 线程 编程 


1. 创建 线程 函数 CreateThread 


HANDLE WINAPI CreateThread( 
.In opt  LPSECURITY ATTRIBUTES lpThreadAttributes, 


.In. SIZE T dwStackSize, 
In. LPTHREAD START ROUTINE lpStartAddress, 
.In opt LPVOID lpParameter, 

In DWORD dwCreationFlags, 


.Out opt LPDWORD lpThreadId 

); 

CD 函数 功能 : 在 进程 的 虚拟 地 址 空间 内 创建 一 个 线程 并 设 定 线程 的 初始 状态 。 一 个 
进程 可 创建 的 线程 数 由 可 用 的 虚拟 内 存 决定 。 在 默认 情况 下 ,每 个 线程 占用 1MB 的 堆栈 空 
间 , 如 果 减 少 线程 堆栈 大 小 , 则 可 以 创建 更 多 的 线程 。 

(2) 参数 说 明 ， 

C 第 1 个 参数 表示 线程 内 核对 象 的 安全 属性 ,一般 传人 NULL 表示 使 用 默认 设置 。 

© 第 2 个 参数 表示 线程 栈 空间 大 小 ,传人 0 表示 使 用 默认 大 小 CIMB) 。 

© 第 3 个 参数 表示 新 线程 所 执行 的 线程 函数 地 址 ,多 个 线程 可 以 使 用 同一 个 函数 
地 址 。 

@ 第 4 个 参数 是 传 给 线程 函数 的 参数 。 

© 第 5 个 参数 指定 额外 的 标识 来 控制 线程 的 创建 , 当 为 0 时 表示 线程 创建 之 后 立即 可 
以 进行 调度 ,如 果 为 CREATE_SUSPENDED 则 表示 线程 创建 后 暂停 运行 ,这 样 它 就 无 法 
调度 了 ,直到 调用 ResumeThread() 为 止 。 

第 6 个 参数 返回 线程 的 ID 号 ,传人 NULL 表示 不 需要 返回 该 线程 的 ID 号 。 

(3) 函数 返回 值 : 如 果 成 功 ,返回 新 线程 的 句柄 ,如 果 失 败 , 返 回 NULL, 


2. 等 待 函数 WaitForSingleObject 


DWORD WINAPI WaitForSingleObject( 
.In HANDLE hHandle, 
In DWORD dwMilliseconds 

) 


果 超 过 最 长 等 待 时 间 对 象 仍 未 被 触发 ,函数 返回 
WAIT_TIMEOUT; 如 果 传 人 参数 有 错误 将 返回 | 闪电 ama 
WAIT_FAILED。 


的 用 法 。 在 该 程序 中 创建 了 两 个 计数 线程 ,图 7.4 是 
两 个 线程 开始 计数 后 的 工作 界面 。 由 于 线程 1 的 优先 图 7.4 两 个 计数 线程 开始 计数 后 
级 高 于 线程 2 的 优先 级 ,所 以 会 获得 更 多 的 时 间 片 , 线 的 工作 界面 

程 1 的 计数 速度 明显 快 于 线程 2。 
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(1) 函数 功能 : 使 线程 进入 等 待 状态 ,直到 指定 的 内 核对 象 被 触发 。 

(2) 参数 说 明 : 

OQ 第 1 个 参数 为 要 等 待 的 内 核对 象 。 

Q 第 2 个 参数 为 最 长 等 待 的 时 间 , 以 毫秒 为 单位 ,如 传人 5000 表示 最 长 等 待 5 秒 , 传 


入 0 表示 立即 返回 ,传人 INFINITE 表示 无 限 等 待 。 


因为 线程 的 句柄 在 线程 运行 时 是 未 触发 的 ,线程 结束 运行 ,句柄 处 于 触发 状态 ,所 以 可 


以 用 WaitForSingleObject() 来 等 待 一 个 线程 结束 运行 。 


(3) 函数 返回 值 : 如 果 在 指定 的 时 间 内 对 象 被 触发 ,函数 返回 WAIT_OBJECT_0; 如 


Win32 API 多 线程 


线程 1 函数 的 输出 : 97 线程 2 函数 的 输出 :77 


下 面 给 出 的 程序 7. 2 演示 了 CreateThread 函数 


程序 7.2 用 CreateThread 创建 两 个 计数 线程 


//Thread2. cpp: 演示 Win32 API 多 线程 编程 


# include "stdafx. h" 
# include "resource. h" 


# define MAX LOADSTRING 100 


// 全 局 变量 

HINSTANCE hInst; // 当 前 实例 
TCHAR szTitle[MAX LOADSTRING]; // 标 题 栏 文本 
TCHAR szWindowClass[MAX LOADSTRING]; // 标 题 栏 文本 
// 函 数 声明 


ATOMMyRegisterClass(HINSTANCE hInstance); 
BOOLInitInstance(HINSTANCE, int); 

LRESULT CALLBACKWndProc(HWND, UINT, WPARAM, LPARAM); 
LRESULT CALLBACKAbout(HWND, UINT, WPARAM, LPARAM); 


// 程 序 人 口 函数 ,第 1 个 线程 函数 

int APIENTRY WinMain(HINSTANCE hInstance, 
HINSTANCE hPrevInstance, 
LPSTR lpCndLine, 
int nCmdShow) 

( 

//TOD0: 将 代码 放 在 这 里 
MSG msg; 
HACCEL hAccelTable; 


// 初 始 化 全 局 字符 串 
LoadString(hInstance, IDS APP TITLE, szTitle, MAX LOADSTRING); 
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LoadString(hInstance, IDC THREAD2, szWindowClass, MAX LOADSTRING); 
MyRegisterClass(hInstance); 


// 应 用 程序 的 初始 化 
if (!InitInstance (hInstance，nCmdShow) ) 
{ 

return FALSE; 


} 
hAccelTable = LoadAccelerators(hInstance, (LPCTSTR)IDC THREAD2); 


// 主 消息 循环 
while (GetMessage(&msg, NULL, 0, 0)) 
( 
if (!TranslateAccelerator(msg. hwnd, hAccelTable, &msg)) 


{ 
TranslateMessage(&nsg) ; 
DispatchMessage(&nsg) ; 


return msg. wParam; 


j 


//MyRegisterClass(): 注册 窗口 类 
ATOM MyRegisterClass(HINSTANCE hInstance) 


( 
WNDCLASSEX wcex; 


wcex.cbSize = sizeof(WNDCLASSEX); 


wcex. style - CS HREDRAW | CS VREDRAW; 

wcex.lpfnWndProc = (WNDPROC)WndProc; 

wcex. cbClsExtra = 0; 

wcex. cbWndExtra = 0; 

wcex. hInstance 7 hInstance; 

wcex. hIcon 7 LoadIcon(hInstance, (LPCTSTR)IDI THREAD2); 
wcex. hCursor 7 LoadCursor(NULL, IDC ARROW); 


wcex.hbrBackground = (HBRUSH)(COLOR WINDOW + 1); 

wcex.lpszMenuName = (LPCSTR)IDC THREAD2; 

wcex.lpszClassName - szWindowClass; 

wcex. hIconSm 7 LoadIcon(wcex.hInstance, (LPCTSTR)IDI SMALL); 


return RegisterClassEx(&wcex) ; 
} 


//InitInstance(HANDLE, int) :保存 实例 句柄 并 创建 主 窗口 
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow) 


{ 
HWND hind; 


hInst - hInstance; // 用 全 局 变量 存储 实例 句柄 
hWnd = CreateWindow(szWindowClass, szTitle, WS OVERLAPPEDWINDOW, 
CW USEDEFAULT, 0, CW USEDEFAULT, 0, NULL, NULL, hInstance, NULL); 
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if (! hWnd) 
{ 
return FALSE; 


ShowWindow( hWnd, nCmdShow) ; 
UpdateWindow( hWnd) ; 


return TRUE; 
) 


// 定 义 第 1 个 线程 函数 
struct threadl 
{ 
HWND hwndl; 
int nol; 
}; 
threadl objl; 
UINT ThreadProc1 (LPVOID lpvoid); 
UINT ThreadProc1 (LPVOID lpvoid) 
{ 
threadl * temp = (threadl * )lpvoid; 
HWND hwnd = temp- > hwndl; 
int no = temp-» nol; 
char buff[200]; 
HDC hdc = GetDC(hwnd); 
for(int i=0;i<no;i++) 
{ 
wsprintf (buff, "线程 1 函数 的 输出 : %d",i+1); 
TextOut(hdc, 50, 50, (LPCTSTR) buff, strlen(buff)); 
Sleep(50); 
) 
return 0; 


) 


// 定 义 第 2 个 线程 函数 
struct thread2 
{ 
HWND hwnd2; 
int no2; 
}; 
thread2 obj2; 
UINT ThreadProc2(LPVOID lpvoid); 
UINT ThreadProc2(LPVOID lpvoid) 
{ 
thread2 * temp = (thread2 * )lpvoid; 
HWND hwnd = temp > hwnd2; 
int no = temp 一 > no2; 
char buff[200]; 
HDC hdc = GetDC(hwnd); 


for(int i=0;i<no;i++) 
{ 
wsprintf (buff, "线程 2 函数 的 输出 : 9 d", i1); 
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TextOut (hdc, 248, 50, (LPCTSTR)buff, strlen(buff)); 
Sleep(75); 


) 


return 0; 


) 


//WndProc(HWND, unsigned, WORD, LONG): [E] Y PK S AE FE EG H i$ E 

//WM, COMMAND: 处 理 菜单 命令 消息 

//WM_PAINT: 重建 主 窗口 

//WM_DESTROY: 处 理 退出 窗口 消息 

LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam) 


t 


int wmId, wmEvent; 

PAINTSTRUCT ps; 

HDC hdc; 

TCHAR szHello[MAX LOADSTRING]; 

LoadString(hInst, IDS HELLO, szHello, MAX LOADSTRING); 


char string[] = "Hello World!"; 
HANDLE hThrdl, hThrd2; 


inti = 0; 
Switch (message) 


{ 


case WM COMMAND: 


wmId 7 LOWORD(wParam); 
wmEvent - HIWORD(wParam); 
// 分 析 菜单 选择 


Switch (wmId) 
{ 
case IDM ABOUT: 
DialogBox(hInst, (LPCTSTR)IDD ABOUTBOX, hWnd, (DLGPROC)About); 
break; 
case IDM EXIT: 
DestroyWindow(hWnd); 
break; 
default: 
return DefWindowProc(hWnd, message, wParam, lParam); 
) 
break; 
case WM_PAINT: 
hdc = BeginPaint(hWnd, &ps); 


// 运 行 第 1 个 线程 
obj1. hwndl = hWnd; 
objl.nol = 140; 


hThrd1 = CreateThread(NULL, // 不 设置 安全 属性 
0, // 使 用 默认 的 堆栈 大 小 
(LPTHREAD START ROUTINE) ThreadProcl, 
(LPVOID)&objl, // 指 向 线程 函数 
CREATE SUSPENDED, // 挂 起 状态 初始 化 线程 


NULL); 
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ResumeThread(hThrd1); // 唤 醒 线程 工作 
SetThreadPriority(hThrd1, THREAD PRIORITY HIGHEST); 


// 运 行 第 2 个 线程 
obj2. hwnd2 = hWnd; 
0bj2.no2 = 260; 


hThrd2 = CreateThread(NULL, // 不 设置 安全 属性 
0, // 使 用 默认 的 堆栈 大 小 
(LPTHREAD START ROUTINE) ThreadProc2, 
(LPVOID)&obj2, // 指 向 线程 函数 
CREATE SUSPENDED, // 挂 起 状态 初始 化 线程 
NULL); 
ResumeThread( hThrd2); 


SetThreadPriority(hThrdi, THREAD PRIORITY LOWEST); 
EndPaint(hWnd, &ps); 
break; 
case WM DESTROY: 
PostQuitMessage(0) ; 
break; 
default: 
return DefWindowProc(hWnd, message, wParam, lParam); 
) 
return 0; 


| 


// 关 于 对 话 框 消息 处 理 
LRESULT CALLBACK About (HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam) 


{ 
switch (message) 


{ 
case WM_INITDIALOG: 
return TRUE; 


case WM_COMMAND: 
if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL) 


{ 
EndDialog(hDlg, LOWORD(wParam)); 


return TRUE; 


} 
break; 


} 


return FALSE; 


} 


7.2.2 用 C 语 言 编写 多 线程 


每 个 Win32 程序 都 至 少 包含 一 个 线程 ,每 一 个 线程 都 可 以 创建 出 另外 的 线程 。 一 个 线 
程 可 能 迅速 完成 工作 后 就 结束 了 ,也 可 能 保持 活动 状态 到 进程 结束 。C 语言 在 Windows 平 
台 上 支持 多 线程 ,LIBCMT fii MSVCRT 这 两 个 C 语 言 运行 时 库 (CRT) 提 供 了 两 个 创建 线 
程 的 函数 _beginthread 和 _beginthreadex, 还 提供 了 两 个 结束 线程 的 函数 _endthread 和 


_endthreadex。 
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_beginthread 和 _beginthreadex 函数 创建 新 线程 ,如 果 操 作成 功 ,返回 线程 标识 符 。 线 
程 完成 时 自动 终止 ,或 者 调用 _endthread 或 _endthreadex 终止 线程 。 


1. beginthread 和 _beginthreadex 函数 


_beginthread 和 _beginthreadex 函数 用 来 创建 新 线程 。 
创建 线程 函数 的 语法 如 下 : 


uintptr t beginthread( // 原 生 代码 
void(  cdecl * start address )( void * ), 
unsigned stack size, 
void * arglist 


) 


uintptr t beginthread( // 托 管 代 码 
void(  clrcall * start address )( void * ), 
unsigned stack size, 
void * arglist 


) 


uintptr t beginthreadex( // 原 生 代 码 
void * security, 
unsigned stack size, 
unsigned ( —stdcall * start address )( void * ), 
void * arglist, 
unsigned initflag, 
unsigned * thrdaddr 

); 


uintptr_t _beginthreadex( // 托 管 代 码 
void * security, 
unsigned stack size, 
unsigned (  clrcall * start address )( void * ), 
void * arglist, 
unsigned initflag, 
unsigned * thrdaddr 
) 
如 果 成 功 ，beginthread 和 _beginthreadex 返回 新 线程 的 句柄 ; 如 果 有 错误 , 则 返回 错 


2. endthread 和 _endthreadex 函数 


_endthread 函数 终止 由 _beginthread 创建 的 线程 ，endthreadex 终止 由 _beginthreadex 
创建 的 线程 。 线 程 会 在 完成 时 自动 终止 。_endthread 和 _endthreadex 用 于 从 线程 内 部 进行 
条 件 终止 。 

如 果 线 程 中 调用 了 C 运行 时 库 (CRT) 函 数 ,应 使 用 _beginthreadex 和 _endthreadex 创 
建 线程 和 终止 线程 ,而 不 是 使 用 CreateThread 和 ExitThread。 如 果 使 用 CreateThread 创 
建 的 线程 调用 了 CRT 函数 ,CRT 函数 则 可 能 异常 终止 进程 。 

程序 7.3 演示 了 线程 函数 _beginthread 和 _endthread 的 用 法 ,该 程序 设计 了 一 个 检查 
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按键 的 线程 CheckKey 和 一 个 字符 飘移 的 线程 Bounce, 其 运行 界面 如 图 7. 5 所 示 。 


图 7.5 C 语 言 多 线程 一 字符 飘移 
程序 7.3 用 C 语 言 编写 字符 飘移 线程 


//CharBounce. cpp: 字符 飘移 

# include < windows.h> 

# include < process. h> /* _beginthread, _endthread * / 
# include < stddef. h> 

# include < stdlib.h» 

# include < conio. h> 


void Bounce( void * ch); 
void CheckKey( void * dummy ); 


/ * 返回 一 个 介 于 nin 和 max 之 间 的 随机 数 * / 
# define GetRandom( min, max ) ((rand() % (int)(((max) + 1) — (min))) + (min)) 


BOOL repeat - TRUE; /* 全 局 变量 ,重复 执行 标志 * / 
HANDLE hStdOut; /* 控制 台 窗口 句柄 * / 
CONSOLE SCREEN BUFFER INFO csbi; /* 控制 台 的 信息 结构 < / 


int main() 


{ 
CHAR ch = 'à'; 


hStdOut = GetStdHandle( STD OUTPUT HANDLE ); 


/* 显示 屏幕 的 文本 行 和 列 的 信息 * / 
GetConsoleScreenBufferInfo( hStdOut, &csbi ); 


/* 创建 启动 Checkkey 线程 ,检查 按键 ,终止 程序 * / 
_beginthread( CheckKey, 0, NULL ); 


/ * 循环 ,直到 CheckKey 线程 终止 程序 * / 

while( repeat ) 

{ 
/* 在 第 一 次 循环 ,开始 字符 的 线程 * / 
_beginthread( Bounce, 0, (void * ) (ch++) ); 


/* 在 循环 之 间 等 待 1 秒 */ 
Sleep( 1000L ); 
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/ * CheckKey 线程 等 待 一 个 按键 ,然后 将 重复 标志 置 x / 
void CheckKey( void * dummy ) 
{ 
_getch(); 
repeat = 0; /* 执行 _endthread 的 条 件 * / 


/* 弹跳 线程 创建 和 控制 的 彩色 字母 在 屏幕 上 四 处 飘移 
* 参数 ch 表示 飘移 的 字母 * / 
void Bounce( void * ch) 
{ 
/* 字母 和 颜色 属性 * / 
char blankcell = 0x20; 
char blockcell - (char) ch; 
BOOL first = TRUE; 
COORD oldcoord, newcoord; 
DWORD result; 


/* 设置 随机 数 发 生 器 种 子 和 字母 初始 位 置 * / 
srand( _threadid ); 
newcoord.X = GetRandom( 0, csbi.dwSize.X — 1); 
newcoord.Y = GetRandom( 0, csbi.dwSize.Y — 1); 
while( repeat ) 
{ 

/* 暂停 循环 时 间 * / 

Sleep( 100L ); 


/* 清空 原 位 置 字母 ,在 新 位 置 绘制 字母 x / 
if( first ) 
first = FALSE; 
else 
WriteConsoleOutputCharacter( hStdOut, &blankcell, 1, oldcoord, &result ); 
WriteConsoleOutputCharacter( hStdOut, &blockcell, 1, newcoord, &result ); 


/* 下 一 个 位 置 的 坐标 值 * / 
oldcoord.X = newcoord.X; 
oldcoord.Y - 

newcoord.X += GetRandom( — 1, 1); 
newcoord.Y += GetRandom( —1, 1); 


/* 如 果 字 母 离开 控制 台 窗 口 , 响 一 声 “ 轮 ”* / 
if( newcoord. X < 0 ) 
newcoord.X = 1; 
else if( newcoord. X == csbi.dwSize.X) 
newcoord.X = csbi.dwSize.X - 2; 
else if( newcoord.Y < 0 ) 
newcoord.Y = 1; 
else if( newcoord.Y == csbi.dwSize.Y) 
newcoord.Y - csbi.dwSize.Y - 2; 


/* 如 果 在 窗口 内 部 ,继续 移动 下 去 ,否则 发 出 响声 * / 


else 
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continue; 
Beep( ((char) ch - 'A') * 100, 175 ); 
) 
/* 调用 终止 线程 函数 < / 
_endthread( ); 


} 


7.2.3 线程 同步 


Win32 提供 了 几 种 同步 资源 的 方式 ,包括 信号 量 、 临 界 区 、 事 件 和 互 斥 锁 。 

当 多 线程 访问 静态 数据 时 ,程序 必须 处 理 可 能 的 资源 冲突 。 假 设 有 这 样 一 个 程序 ,一 个 
线程 更 新 静态 数据 结构 ,该 结构 包含 要 由 其 他 线程 显示 的 K Y 坐标 。 如 果 更 新 线程 更 改 了 
X 坐标 并 且 在 更 改 Y 坐标 之 前 被 显示 线程 取代 ,可 能 导致 在 错误 的 位 置 显示 信息 。 通 过 使 
用 互 斥 锁 控 制 对 坐标 的 访问 ,可 以 避免 此 类 问题 的 发 生 。 

互 斥 锁 (Mutex) 通 常用 于 协调 多 个 线程 或 进程 的 活动 ,通过 锁定 和 取消 锁定 资源 实现 
对 共享 资源 的 独占 式 访问 。 为 解决 上 述 K, Y 坐标 的 更 新 问题 ,更 新 线程 将 设置 Mutex 指 
示 数 据 结 构 正 在 使 用 ,更 新 线程 会 在 两 个 坐标 全 部 处 理 完 之 后 清除 互 斥 锁 ,显示 线程 在 更 新 
线程 工作 时 必须 等 待 互 斥 锁 被 释放 。 由 于 显示 线程 被 阻止 到 Mutex 清除 后 才能 继续 ,因此 
等 待 Mutex 的 线程 通常 称 为 在 Mutex 上 “阻塞 ”。 

再 举 一 个 例子 ,程序 可 能 有 多 个 线程 访问 同一 文件 。 由 于 其 他 线程 可 能 已 经 移动 了 
文件 指针 ,因此 每 个 线程 在 读 取 或 写 入 之 前 必须 重新 设置 文件 指针 。 另 外 ,每 个 线程 必 
须 确 保 在 它 定位 指针 和 访问 文件 两 个 时 间 之 间 没 有 被 蔡 换 。 这 些 线程 应 该 通过 
WaitForSingleObject 和 ReleaseMutex 调用 将 每 个 文件 的 访问 括 起 来 ,以 使 用 互 斥 锁 协 调 对 
文件 的 访问 。 下 面 的 代码 片段 演示 了 互 斥 锁 技 术 : 

HANDLE hIOMutex = CreateMutex(NULL, FALSE, NULL); 

WaitForSingleObject( hlOMutex, INFINITE ); 

fseek( fp, desired position, OL); 

fwrite( data, sizeof( data ), 1, fp ); 

ReleaseMutex( hlIOMutex); 

程序 7.4 演示 了 如 何 使 用 WaitForSingleObject 函数 同步 _beginthreadex 创建 返回 的 线程 
句柄 。 该 程序 包括 主线 程 main 和 子 线程 SecondThreadFunc。 子 线程 完成 循环 一 百 万 次 的 计 
数 任务 ,程序 运行 结果 如 图 7. 6 所 示 。 主 线程 
main 要 等 待 第 二 个 线程 Second ThreadFunc 终止 
才能 继续 执行 , 当 第 二 个 线程 调用 _endthreadex 
时 ,会 引起 线程 信号 状态 的 变化 ,主线 程 继续 
运行 。 图 7.6 C 语 言 多 线程 中 的 同步 

程序 7.4 用 CC 语言 编写 多 线程 同步 实例 1 


//Counter.cpp: 计数 器 线程 演示 
* include < windows.h> 

# include < stdio.h» 

* include < process. h> 
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unsigned Counter; 
// 定 义 一 个 计数 器 线程 
unsigned __stdca11 SecondThreadFunc( void * pArguments ) 
t 
printf( "线程 #2 开始 工作 .… 接 下 来 要 循环 1 百 万 次 \n" ); 


while ( Counter < 1000000 ) 
Counter**; 


.endthreadex( 0 ); 
return 0; 


i 


int main() 

( 
HANDLE hThread; 
unsigned threadID; 


printf( "创建 线程 #2...\n" ); 
UER 2 个 线程 
hThread = (HANDLE) beginthreadex( NULL, 0, &SecondThreadFunc, NULL, 0, &threadID ); 


// 等 待 ,直到 第 2 个 线程 终止 
// 如 果 注 释 掉 下 面 的 行 ,计数 器 将 不 能 正确 工作 , 因为 线程 还 没有 终止 
// 计 数 器 不 能 递增 到 1000 000 
WaitForSingleObject( hThread, INFINITE ); 
printf(" 计 数 器 最 后 输出 结果 应 该 是 1000000; 真实 的 输出 结果 是 -> dn", Counter ); 
// 销 毁 线程 对 象 
CloseHandle( hThread ) ; 
) 


7.2.4 创建 多 线程 的 步骤 

通过 前 面 的 实例 演示 ,可 以 将 C 语言 和 Win32 API 创建 多 线程 的 过 程 归 纳 为 以 下 两 个 
JH. 

1. 定义 线程 函数 

线程 函数 首先 是 一 个 普通 函数 ,因此 与 普通 函数 的 定义 一 样 。 不 同 之 处 在 于 ,线程 两 数 


的 参数 必须 是 void 类 型 的 长 指针 ,这 样 就 可 以 通过 void 类 型 的 长 指针 向 线程 函数 传递 任何 
类 型 的 数据 。 一 个 线程 函数 的 框架 定义 如 下 : 


ThreadFunction(LPVOID param) 


// 做 某 事 
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2. 在 主 函 数 或 其 他 线程 函数 中 用 _beginthread、beginthreadex .CreateThread 函数 创建 
新 线程 


下 面 给 出 的 程序 7. 5 是 一 个 演示 用 C 语言 编写 多 线程 的 例子 ,其 结构 和 步骤 特别 清 


晰 ,程序 运行 界面 如 图 7.7 所 示 。 
程序 7.5 用 C 语 言 编写 多 线程 同步 实例 2 s 


# include < windows. h> 
# include <stdlib.h> 
# include < string. h> 
# include < stdio. h> 图 7.7 C 语 言 多 线程 演示 结果 
include < conio. h> 

# include < process. h> 


// 第 2 个 线程 函数 


void ThreadProc(void * param); 


// 第 1 个 线程 函数 
int main() 
{ 
int n; 
inti; 
int val = 0; 
HANDLE handle; 


printf("\t C 语 言 多 线程 演示 \n"); 

printf(" 请 输入 希望 开启 的 线程 数 :"); 

scanf(" * d", &n) ; 

for(i-0;i«n;ie*) 

{ 
val = i*1; 
handle = (HANDLE) beginthread( ThreadProc, 0, &val); // 创 建 线程 
WaitForSingleObject(handle, INFINITE); 

) 


return 0; 


) 


void ThreadProc(void * param) 

{ 
int h= *((int* )param); 
printf(" 第 sd 个 线程 正在 运行 …… Vn", h); 
| endthread() ; 

) 


7.2.5 多 线程 程序 一 一 笑脸 


程序 7. 6(Bounce. c) 是 一 个 经 典 的 C 语言 多 线程 程序 ,每 次 输入 字母 a 或 A 时 , 它 都 创 
建新 的 线程 ,每 个 线程 都 在 屏幕 的 周围 显示 不 同 颜色 的 笑脸 。 这 个 程序 与 前 面 的 程序 7. 3 
相 比 更 好 地 使 用 了 同步 技术 ,并 设 定 最 多 可 以 创建 32 个 线程 。 当 输入 q 或 Q 时 ,终止 程 
序 。 程 序 的 运行 界面 如 图 7.8 所 示 。 
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Threads running: 28. 'A' to start,'Q' to qui 


图 7.8 笑脸 程序 的 运行 界面 


Bounce. c 程序 使 用 名 为 hScreenMutex 的 Mutex 协调 屏幕 更 新 ,每 当 其 中 的 一 个 显示 
线程 准备 写 入 屏幕 时 ,将 调用 WaitForSingleObject, 使 用 hScreenMutex 句柄 和 常数 
INFINITE 指示 WaitForSingleObject 调用 应 该 在 互 斥 锁 上 阻止 且 不 应 该 超时 。 线 程 完成 
显示 更 新 后 ,通过 调用 ReleaseMutex 释放 互 斥 锁 。 

程序 7.6 笑脸 程序 完整 代码 

// 程 序 名 :Bounce.c 

//Bounce: 每 当 从 键盘 上 按 下 字母 'a' 时 创建 一 个 新 线程 


// 每 个 线程 在 屏幕 的 周围 显示 不 同 颜 色 的 笑脸 
// 从 键盘 输入 字母 'Q' 时 终止 所 有 线程 


# include < windows.h> 
* include < stdlib.h> 
* include < string. h> 
# include < stdio. h> 

# include < conio. h> 

# include < process. h> 


# define MAX_THREADS 32 // 定 义 最 大 线程 数 


//getrandom 函数 返回 一 个 介 于 min 和 max 之 间 的 随机 整数 
# define getrandom( min, max ) (SHORT)((rand() * (int)(((max) + 1)- (min))) + (min)) 


int main( void ); // 线 程 1: main 
void KbdFunc( void ) ; // 键 盘 输入 ,线程 调度 
void BounceProc( void * MyID ); // 线 程 2 3| n: 显示 
void ClearScreen( void ); // 清 屏 

void ShutDown( void ); // 关 闭 线程 

void WriteTitle( int ThreadNum ); // 显 示 标 题 栏 信息 
HANDLE hConsoleOut; // 控 制 台 句 柄 
HANDLE hRunMutex; //* Skis £1" H Fe 
HANDLE hScreenMutex; //* 屏 幕 更 新 " 互 斥 
int ThreadNr; // 已 启动 的 线程 数 
CONSOLE SCREEN BUFFER INFO csbiInfo; // 控 制 台 信息 

int main() // 主 线程 

{ 


// 获 取 屏 幕 信息 ,清除 屏幕 
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hConsoleOut = GetStdHandle( STD OUTPUT HANDLE ); 
GetConsoleScreenBufferInfo( hConsoleOut, &csbiInfo ); 
ClearScreen(); 

WriteTitle( 0 ); 


// 创 建 互 斥 锁 和 复位 线程 数 

hScreenMutex = CreateMutex( NULL, FALSE, NULL); // 清 空 
hRunMutex = CreateMutex( NULL, TRUE, NULL ); // 设 置 
ThreadNr = 0; 


// 等 待 键盘 输入 ,以 便 调度 线程 或 退出 
KbdFunc() ; 


// 所 有 线程 完成 ,清理 句柄 

CloseHandle( hScreenMutex ); 

CloseHandle( hRunMutex ); 

CloseHandle( hConsoleOut ); 
) 


void ShutDown( void ) // 关 闭 线程 
( 
while ( ThreadNr > 0 ) 
{ 
// 释 放 互 斥 锁 对 象 ,线程 数 递 减 
ReleaseMutex( hRunMutex ) 
ThreadNr -- ; 
) 


// 在 所 有 线程 结束 后 清理 屏幕 
WaitForSingleObject( hScreenMutex, INFINITE ); 
ClearScreen(); 
) 
// 调 度 并 且 为 线程 计数 
void KbdFunc( void ) 
{ 


int KeyInfo; 


do 
{ 
KeyInfo = _getch(); 
if ( tolower( KeyInfo ) == 'a'&& 
ThreadNr « MAX THREADS ) 
t 
ThreadNr-**; 
.beginthread( BounceProc, 0, &ThreadNr ); 
WriteTitle( ThreadNr ); 
) 
} while( tolower( KeyInfo ) := 'q'); 


ShutDown(); 
) 


void BounceProc( void * pMyID ) 
( 
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char MyCe11, OldCell; 

WORD MyAttrib, OldAttrib; 
char BlankCell = 0x20; 
COORD Coords, Delta; 

COORD Old - (0,0); 

DWORD Dummy; 

char * MyID = (char * )pMyID; 


// 生 成 的 更 新 增 量 和 初始 坐标 
srand( (unsigned int) * MyID * 3); 


Coords.X = getrandom( 10, csbiInfo.dwSize.X — 10); 
Coords.Y = getrandom( 10, csbiInfo.dwSize.Y — 10); 
Delta. X = getrandon( - 3,3); 
Delta. Y = getrandom( - 3,3); 


// 根 据 线 程 号 设置 笑脸 方块 属性 
if( * MyID» 16) 

MyCell - 0x01; // 轮 廓 笑脸 
else 

MyCell = 0x02; // 实 心 笑脸 
MyAttrib = * MyID & OxOF; // 强 制 使 用 黑色 背景 
do 
{ 

// 等 待 可 以 显示 的 时 候 , 然后 锁 上 它 


WaitForSingleObject( hScreenMutex, INFINITE ); 


// 如 果 我 们 还 要 继续 占用 旧 的 位 置 , 则 清空 它 
ReadConsoleOutputCharacter( hConsoleOut, &OldCell, 1, 

Old, &Dummy ); 
ReadConsoleOutputAttribute( hConsoleOut, &OldAttrib, 1, 

Old, &Dummy ); 
if ((OldCell == MyCell) && (OldAttrib == MyAttrib)) 

WriteConsoleOutputCharacter( hConsoleOut, &BlankCell, 1, 
Old, &Dummy ); 


// 画 新 的 笑脸 ,然后 清除 锁 

WriteConsoleOutputCharacter( hConsoleOut, &MyCell, 1, 
Coords, &Dummy ); 

WriteConsoleOutputAttribute( hConsoleOut, &MyAttrib, 1, 
Coords, &Dummy ); 

ReleaseMutex( hScreenMutex ); 


// 下 一 个 小 方块 递增 的 坐标 位 置 
Old.X = Coords.X; 

Old.Y - Coords.Y; 

Coords.X *- Delta.X; 
Coords.Y *- Delta.Y; 


// 如 果 即 将 离开 屏幕 边界 , 则 调转 方向 
if( Coords.X< 0 | | Coords.X >= csbiInfo.dwSize.X ) 
{ 

Delta.X = -Delta.X; 


Beep( 400, 50 ); 
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i 
if( Coords.Y < 0 || Coords. Y > csbiInfo.dwSize.Y ) 


{ 
Delta.Y = -Delta.Y; 
Beep( 600, 50 ); 
) 
) 
// 当 RunMutex 仍 有 效 时 一 直 重 复 
while ( WaitForSingleObject( hRunMutex, 75L ) == WAIT TIMEOUT ); 
) 


void WriteTitle( int ThreadNum ) 
( 
enum { 
sizeOfNThreadMsg = 80 
E 
char NThreadMsg[ sizeOfNThreadMsg] ; 


sprintf s( NThreadMsg, sizeOfNThreadMsg, 
"Threads running: $ 02d. 'A'to start, 'Q' to quit.", ThreadNum ); 
SetConsoleTitle(NThreadMsg ) ; 
) 


void ClearScreen( void ) 
{ 
DWORD dummy; 
COORD Home = { 0, 0}; 
FillConsoleOutputCharacter( hConsoleOut, '', 
csbiInfo.dwSize.X * csbiInfo.dwSize.Y, 
Home, &dummy ); 
) 
用 VS2010 编译 和 调试 多 线程 程序 Bounce. c, 其 步骤 简 述 如 下 : 
CD 在 “文件 ”菜单 上 单 击 “ 新 建 ”, 然 后 单 击 “ 项 目 ”。 
(2) 在 “项 目 类 型 " 窗 格 中 单 击 Win32。 
(3) 在 “模板 " 窗 格 中 单 击 “*Win32 控制 台 应 用 程序 ”, 然 后 命名 项 目 。 
(4) 将 包含 C 源 代码 的 文件 (程序 7.6) 添 加 到 项 目 中 。 
(5) 选择 “调试 一 开始 执行 (不 调试 )” 命 令 ,观察 到 的 运行 结果 如 图 7.8 所 示 。 
本 节 中 的 其 他 实例 都 可 以 参照 以 上 步骤 运行 。 


E 用 Ced MFC 编写 多 线程 
MFC 提供 了 对 多 线程 应 用 程序 的 支持 。 在 MFC 中 ,线程 分 为 两 种 ,一 种 是 用 户 界面 


线程 (User-Interface Thread) , 另 一 种 是 工作 线程 (Worker Thread)。 这 两 种 线程 适用 于 不 
同 的 任务 需求 。 
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7.3.1 MFC 线程 类 


MFC 提供 的 多 线程 类 如 图 7. 9 所 示 , 图 中 标注 五 角 星 的 是 与 线程 操作 相关 的 类 。 其 中 ， 
CWinThread 类 的 继承 关系 为 CObject 一 二 CCmdTarget 一 二 CWinThread 一 二 CWinApp。 
用 MFC 应 用 程序 向 导 生 成 的 MFC 程序 框架 中 的 CWinApp 类 对 象 是 用 户 界 面 线程 ,也 是 
主线 程 。 


CCmdTarget Synchronization/ 
Thread Support 


Synchronization 


CSyncObjeck [CProcessLocalObject | 


F CWinThread X | 


gum Heonealsection ] —[CProcessLocal 
OST — CMultiLock w 
| CWinAppEx E—— ——À T x 
Windows Sockets T cadLocalObjec 
CASyncSocket —[CSemaphorex ] -CrhradLocalk | 
CSingl leLock * 
CThreadShotData 


图 7.9 MFC 多 线程 类 


在 MFC 应 用 程序 中 ,所 有 的 线程 都 是 用 CWinThread 类 的 对 象 来 表示 的 。 
CWinThread 类 是 MFC 用 来 封装 线程 的 ,包括 用 户 界 面 线程 和 工作 线程 ,因此 ,每 个 MFC 
程序 至 少 使 用 一 个 CWinThread 派生 类 。 

Windows 以 消息 驱动 机 制 工作 ,每 个 Win32 应 用 程序 都 至 少 包含 一 个 消息 队列 和 一 个 
消息 泵 。 消 息 队 列 建立 在 操作 系统 提供 的 内 存 保留 区 中 ,消息 泵 不 断 搜寻 消息 队列 ,将 取得 
的 消息 分 发 给 应 用 程序 的 各 个 部 分 进行 处 理 ,这 个 过 程 称 为 消息 循环 。 消 息 循环 的 基本 结 
HW. 


// 从 队列 中 获取 消息 
while(GetMessage(&msg, 0,0,0)) 


{ 

// 转 换 消息 参数 
TranslateMesssage(&nsg) ; 
// 分 发 消息 
DispatchMessage(&msg) ; 

) 


Windows 以 线程 封装 上 面 的 消息 循环 ,封装 消息 循环 的 线程 称 为 用 户 界面 线程 , 即 UI 
线程 ,该 线程 可 以 创建 并 撤销 窗口 。 工 作 线程 则 没有 消息 循环 ,不 能 处 理 系统 事件 和 窗口 消 
息 , 也 不 能 关联 主 窗口 。 主 线程 和 工作 线程 虽然 享有 共同 的 虚拟 地 址 空间 ,但 各 自 独 立地 使 
用 CPU 时 间 片 ,参与 系统 资源 的 竞争 。 所 以 ,用 户 可 以 使 用 工作 线程 完成 经 常 性 的 、 耗 费 
机 时 的 数据 处 理工 作 ( 例 如 网 络 通信 ) ,减轻 UT 线程 的 负担 ,确保 UI 线程 及 时 响应 用 户 的 
窗口 操作 。 根 据 需 要 ,在 一 个 应 用 程序 中 也 可 以 创建 多 个 UI 线程 。 

MFC 的 CWinThread 类 封装 了 对 线程 的 操作 ,一 个 CWinThread 对 象 代表 应 用 程序 中 
的 一 个 线程 。 在 MFC 应 用 程序 中 , 主 执行 线程 是 由 CWinThread 的 派生 类 CWinApp 派生 
的 对 象 。 由 CWinApp 类 派生 的 新 类 都 是 用 户 界面 线程 。 
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CWinThread 类 的 成 员 变 量 有 以 下 5 个 。 

* m_bAutoDelete: 线程 终止 时 是 否 自 动 销毁 。 
* m hTread; 当前 线程 的 句柄 。 

* m_nTreadID: 当前 线程 的 标识 。 

* m pMainWnd: 应 用 程序 主 窗口 指针 。 

* m pActiveWnd: 激活 窗口 指针 。 


2. 成 员 函 数 


下 面 介绍 CWinThread 类 的 常用 成 员 函 数 。 
(1) CreateTread 函数 用 于 创建 一 个 新 线程 ,该 函数 的 声明 如 下 : 


BOOL CreateTread 

{ 

DWORD dwCreateFlags = 0, // 线 程 的 创建 标志 
UINT nStackSize= 0, // 线 程 的 堆栈 大 小 


LPSECURITY ATTRIBUTES lpSecurityAttrs = NULL // 线 程 的 安全 属性 
p 


(2) GetTreadPriority 函数 用 于 获取 线程 的 优先 级 ,该 函数 的 声明 如 下 : 
int GetTreadPriority(); 
线程 的 优先 级 取 值 如 下 : 
* THREAD PRIORITY TIME CRITICAL; 实时 优先 级 。 
THREAD PRIORITY HIGHEST: 比 普通 优先 级 高 两 个 单位 。 
THREAD_PRIORITY_ABOVE_NORMAL: 比 普通 优先 级 高 一 个 单位 。 
THREAD_PRIORITY_NORMAL: 普通 优先 级 。 
。THREAD_PRIORITY_BELOW_NORMAL: 比 普通 优先 级 低 一 个 单位 。 
。 THREAD_PRIORITY_LOWEST: 比 普通 优先 级 低 两 个 单位 。 
。 THREAD_PRIORITY_IDLE: 空闲 优先 级 。 
(3) SetThreadPriority 函数 用 于 设置 线程 的 优先 级 ,该 函数 的 声明 如 下 : 
BOOL SetThreadPriority( 
int nPriority; // 优 先 级 
); 
(4) PostThreadMessage 函数 用 于 向 另 一 个 CWinThread 对 象 发 送信 息 , 该 函数 的 声 
明 如 下 : 


BOOL PostThreadMessage( 

UINT message, // 用 户 定义 消息 标识 
WPARAM wParam, // 消 息 的 第 1 个 参数 
LPARAM lParam // 消 息 的 第 2 个 参数 


n 
(5) SuspendThread 函数 用 于 将 线程 的 挂 起 计数 加 1. 当 线 程 的 挂 起 计数 大 于 0 时 ,该 
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线程 将 暂停 执行 , 称 之 为 挂 起 状态 。 该 函数 的 声明 如 下 : 
DWORD SuspendThread() ; 


(6) ResumeThread 函数 用 于 将 生成 的 挂 起 计数 减 1, 当 线 程 的 挂 起 计数 减少 到 0 时 ， 
恢复 线程 的 执行 。 该 函数 的 声明 如 下 : 


DWORD ResumeThread( ) ; 


3. 重 载 函数 


下 面 介绍 CWinThread 类 的 常用 重 载 函数 。 

(1) InitInstance 函数 用 于 执行 线程 实例 的 初始 化 工作 ,该 函数 的 声明 如 下 : 
virtual BOOL InitInstance(); 

(2) ExitInstance 函数 用 于 执行 清理 工作 ,该 函数 的 声明 如 下 : 

virtual int ExitInstance(); 

(3) OnIdle 函数 用 于 执行 线程 空闲 处 理工 作 , 该 函数 的 声明 如 下 : 

virtual BOOL OnIdle(LONG ICount ); 


MFC 还 提供 了 一 组 以 CSyncObject 为 父 类 的 线程 同步 类 ,其 子 类 有 CEvent, CMutex, 
CCriticalSection 和 CSemaphore。 


7.3.2 用 户 界面 线程 


用 户 界面 线程 是 用 来 处 理 用 户 输入 和 响应 用 户 事件 的 线程 。 当 用 MFC 框架 创建 应 用 
程序 时 ,程序 的 主线 程 已 经 由 CWinApp 这 个 类 创建 完成 。 下 面 介 绍 在 此 基础 上 创建 其 他 
用 户 界面 线程 的 步骤 。 

首先 要 做 的 是 创建 一 个 派生 自 CWinThread 的 用 户 界 面 线程 类 ,需要 使 用 DECLARE_ 
DYNCREATE fll IMPLEMENT DYNCREATE 宏 命令 声明 和 实现 这 个 类 , 创建 的 用 户 界 
面 线程 类 必须 重 载 基 类 中 的 某 些 函 数 ,这 些 函 数 如 表 7. 2 所 示 。 


表 7.2 创建 用 户 界面 线程 类 时 需要 重 载 的 函数 


A w* x 能 
ExitInstance 线程 退出 时 执行 清理 工作 ,通常 情况 下 需要 重 载 
InitInstance 执行 线程 初始 化 工作 ,必须 被 重 载 
Onldle 执行 线程 空闲 时 间 处 理工 作 ,一 般 不 需要 重 载 
PreTranslateMessage 在 消息 交 由 TranslateMessage 和 DispatchMessage 处 理 之 前 进行 预 处 理 ， 
一 般 不 需要 重 载 
ProcessWndProcException ”拦截 由 线程 的 消息 和 命令 处 理 程序 抛 出 的 未 处 理 异常 ,一 般 不 需要 重 载 
Run 线程 的 控制 函数 ,包含 消息 泵 , 极 少 需 要 重 载 


MFC 通过 参数 重 载 实现 了 两 种 版 本 的 AfxBeginThread 函数 用 来 创建 线程 对 象 。 其 
中 ,一 种 只 能 用 来 创建 工作 线程 , 男 一 种 既 可 以 用 来 创建 用 户 界面 线程 ,也 可 以 用 来 创建 工 
作 线 程 。 下 面 介绍 其 语法 形式 。 
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语法 形式 一 : 
CWinThread * AfxBeginThread( // 只 能 创建 工作 线程 
AFX THREADPROC pfnThreadProc, 
LPVOID pParam, 
int nPriority - THREAD PRIORITY NORMAL, 
UINT nStackSize - 0, 
DWORD dwCreateFlags = 0, 
LPSECURITY ATTRIBUTES lpSecurityAttrs - NULL 
); 
语法 形式 二 : 
CWinThread * AfxBeginThread( // 可 创建 用 户 界面 线程 或 工作 线程 
CRuntimeClass * pThreadClass, 
int nPriority = THREAD PRIORITY NORMAL, 
UINT nStackSize = 0, 
DWORD dwCreateFlags = 0, 
LPSECURITY ATTRIBUTES lpSecurityAttrs - NULL 
); 
创建 用 户 界面 线程 ,使 用 后 面 的 AfxBeginThread 形式 ,其 参数 的 含义 如 下 。 
(1) pThreadClass: 指向 由 CWinThread 派生 的 类 对 象 。 
(2) nPriority: 可 省 略 , 表 示 线 程 的 优先 级 。 
(3) nStackSize: 可 省 略 ,表示 线程 的 堆栈 大 小 ,默认 与 创建 线程 一 样 大 。 
(4) dwCreatFlags: 默认 值 为 0. 表示 正常 启动 线程 。 如 果 设 置 为 CREATE_ 
SUSPENDED, 则 线程 被 创建 后 处 于 挂 起 状态 。 
(5) lpSecurityAttrs: 可 省 略 , 用 于 设置 安全 属性 ,默认 与 父 线程 相同 。 
AfxBeginThread 完成 了 创建 一 个 新 线程 对 象 的 大 部 分 工作 ,用 指定 的 参数 初始 化 并 调 
用 CWinThread: : CreateThread 创建 和 开始 执行 线程 。 下 面 给 出 的 程序 7.7 演示 了 用 户 界 
面 线程 在 服务 器 套 接 字 编程 中 的 应 用 。 
程序 7.7 用 户 界 面 线程 用 于 服务 器 套 接 字 编 程 
// 定 义 套 接 字 线 程 对 象 
class CSockThread : public CWinThread 
{ 
public: 
SOCKET m_hConnected; 


protected: 
CChatSocket m_sConnected; 


// 剩 下 的 类 声明 省 略 


// 初 始 化 套 接 字 线 程 
BOOL CSockThread: : InitInstance() 


t 
// 在 线程 的 上 下 文 使 用 Socket 对 象 的 套 接 字 句柄 
m sConnected. Attach(m hConnected); 
m hConnected - NULL; 
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return TRUE; 
) 
// 在 服务 器 端 创建 新 的 线程 对 象 与 客户 端 通信 
// 该 侦 听 套 接 字 已 在 主线 程 构 造 
void CListeningSocket: :OnAccept( int nErrorCode) 
{ 
UNREFERENCED PARAMETER( nErrorCode); 


// 使 用 CSocket 对 象 暂时 接受 传人 的 连接 
CSocket sConnected; 
Accept( sConnected) ; 


// 开 始 其 他 线程 

CSockThread * pSockThread = (CSockThread * )Af£xBeginThread( 
RUNTIME CLASS(CSockThread), THREAD PRIORITY NORMAL, 0, CREATE SUSPENDED); 

if (NULL != pSockThread) 

{ 
// 分 离 新 接受 的 套 接 字 , 在 新 的 线程 对 象 中 保存 套 接 字 句柄 
// 分 离 后 , 它 不 再 使 用 该 线程 的 上 下 文 
pSockThread -» m hConnected = sConnected. Detach(); 
pSockThread - > ResuneThread() ; 

} 

} 


7.3.3 工作 线程 


创建 工作 线程 相对 于 创建 用 户 界面 线程 要 简单 一 些 , 只 需要 两 步 (类 似 于 前 面 的 C 和 
Win32 APD: 

(1) 实现 工作 线程 的 控制 函数 。 

(2) 用 AfxBeginThread 函数 创建 启动 线程 。AfxBeginThread 创建 并 初始 化 一 个 
CWinThread 线程 对 象 ,返回 这 个 线程 对 象 的 地 址 。 

除非 特别 需要 , 才 从 CWinThread 派生 子 类 自 定义 工作 线程 类 ,在 大 多 数 情况 下 ,工作 
线程 不 需要 创建 CWinThread 的 子 类 ,可 以 直接 使 用 CWinThread 类 。 

前 面 的 用 户 界面 线程 部 分 给 出 了 AfxBeginThread 函数 的 两 种 重 载 形 式 ,第 一 种 专门 
用 于 创建 并 启动 工作 线程 ,其 参数 的 含义 如 下 。 

(1) pfnThreadProc: 表示 控制 函数 的 地 址 。 

(2) pParam: 向 控制 函数 传递 的 参数 。 

(3) nPriority: 可 省 略 , 表 示 线 程 的 优先 级 。 

(4) nStackSize: 可 省 略 ,表示 线 程 的 堆栈 大 小 ,默认 与 创建 线程 一 样 大 。 

(5) dwCreateFlags: 默认 值 为 0, 表示 正常 启动 线程 。 如 果 设 置 为 CREATE_SUSPENDED， 
则 线程 被 创建 后 处 于 挂 起 状态 。 

(6) lpSecurityAttrs: 可 省 略 , 用 于 设置 安全 属性 ,默认 与 父 线程 相同 。 

在 创建 工作 线程 之 前 要 先 定义 控制 函数 。 控 制 函数 实现 了 线程 的 功能 逻辑 , 当 控 制 函 
数 开始 执行 时 ,线程 开始 启动 ; 当 控制 函数 结束 退出 时 ,线程 也 跟着 结束 。 控 制 函 数 的 定义 
形式 如 下 : 
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UINT MyControllingFunction( LPVOID pParam ); 


其 中 ,MyControllingFunction 是 控制 函数 的 名 字 , 由 编程 者 自行 定义 。 
参数 pParam 是 一 个 32 位 的 指针 , 它 是 在 启动 工作 线程 时 ,由 AfxBeginThread 函数 传 
递 给 控制 函数 的 。 这 个 指针 既 可 以 指向 简单 的 数据 类 型 ,用 来 传递 int 之 类 的 简单 数据 ; 也 
可 以 指向 复杂 的 数据 结构 ,例如 对 象 或 结构 体 ,从 而 传递 更 多 的 信息 ; 当 不 需要 传递 数据 
时 ,可 以 忽略 这 个 参数 。 参 数 pParam 不 仅 可 以 将 数据 从 调用 者 线程 传递 到 被 调用 线程 ,也 
可 以 将 数据 从 被 调用 线程 返回 至 调用 者 线程 。 
当 控 制 函数 结束 时 , 它 返 回 一 个 uint 类 型 的 数值 ,用 来 表述 函数 结束 的 原因 。 如 果 返 回 
0, 表 示 正 常 结束 ,函数 执行 成 功 ; 如 果 返 回 其 他 值 , 表 示 出 现 错误 。 
下 面 的 程序 7. 8 演示 了 如 何 创建 和 调用 工作 线程 。 
程序 7.8 工作 线程 的 创建 和 调用 
UINT MyThreadProc( LPVOID pParam ) // 控 制 函 数 
i CMyObject * pObject = (CMyObject * )pParam; 
if (pObject == NULL || 
! pObject — > IsKindOf(RUNTIME CLASS(CMyObject))) 
return 1; // 如 果 pObject 无 效 


// 用 'pobject' 做 什么 


return 0; // 线 程 已 成 功 完成 
) 


// 程 序 中 的 不 同 功能 

We 

pNewObject = new CMyObject; 

AfxBeginThread(MyThreadProc, pNewObject); // 创 建 工作 线程 
ffi 


7.3.4 线程 同步 类 


从 图 7. 9 可 以 看 出 , MFC 提供 了 两 种 类 型 的 线程 同步 类 。 一 种 是 同步 类 ,包括 
CSyncObject、CSemaphore、CMutex、CCriticalSection 和 CEvent; 另 一 种 是 同步 访问 类 , 包 
括 CMultiLock 和 CSingleLock. 

这 么 多 的 同步 类 ,如 何 决定 到 底 使 用 哪个 类 呢 ? 选择 原则 如 下 

CD 应 用 程序 是 否 需要 等 待 某 件 事情 发 生 , 才 可 以 访问 该 资源 (例如 ,数据 被 写 人 到 一 
个 文件 之 前 必须 从 一 个 通信 端口 接收 完毕 )? 如 果 回 答 是 , 则 使 用 CEvent。 

(2) 同一 程序 的 多 个 线程 可 以 在 同一 时 间 访 问 某 个 资源 吗 (例如 ,应 用 程序 允许 5 个 窗 
口 显示 同一 文件 的 内 容 ) ? 如 果 回 答 是 , 则 使 用 CSemaphore。 

(3) 多 个 应 用 程序 可 以 使 用 某 个 资源 吗 ( 例 如 使 用 某 个 DLL)? 如 果 回 答 是 , 则 使 用 
CMutex; 如 果 回 答 不 , 则 使 用 CCriticalSection 。 

CSyncObject 不 能 直接 使 用 , 它 只 是 实现 了 其 他 4 个 同步 类 的 基 类 定义 。 对 于 更 详细 
的 说 明 请 读者 参见 MSDN. 
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7.3.5 MFC 多 线程 程序 一 一 自行 车 比赛 


程序 7.9 给 出 了 一 个 自行 车 比赛 多 线程 实例 。 这 个 程序 模拟 9 名 自行 车 运动 员 同 时 出 
发 进行 比赛 ,有 一 名 裁判 员 乘 坐 自 动车 跟随 运动 员 一 起 出 发 ,到 达 终 点 时 停止 前 进 。 该 程序 


的 运行 界面 如 图 7. 10 所 示 。 


该 程序 用 9 个 工作 线程 Thread] ~ Thread9) 模拟 9 名 自行 车 运动 员 , 工作 线程 
Thread10 模拟 裁判 员 ,程序 主线 程 派生 自 CWinApp。 该 程序 的 完整 代码 见 程序 7.9。 


pa 


图 7.10 MFC 多 线程 程序 自行 车 比赛 的 运行 界面 


程序 7.9 自行 车 比赛 程序 完整 代码 


LEX LJ 


include < afxwin.h» 
include < afxext. h> 
include < stdio. h> 
include "resource. h" 


CWinThread 


* pThreadl, * pThread2, * pThread3, + pThread4, * pThread5, * pThread6, * pThread7, * pThread8, 


* pThread9, * pThread10; 


int posx, posy; 
UINT Thread1 (LPVOID lp) 


( 


CBitmap bmp; 

BITMAP bit; 

CDC cMendc; 

CDC * dc; 

dc = CDC: :FronHandle( (HDC) LOWORD(1p) ) ; 
int col; 

col = HIWORD(1p); 

CClientDC cdc(AfxGetApp() 一 > m pMainWnd); 
bmp. LoadBitmap(IDB BITMAPI); 

bmp. GetObject(sizeof(BITMAP), &bit); 
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cMendc. CreateCompatibleDC(&cdc); 
cMendc. SelectObject(&bmp) ; 


for(int posx= 10, posy = 4; osx « = 510; posx** ) 
{ 


cdc. BitBlt(posx, posy, bit. bmWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 


Sleep(2); 
} 


return 0; 


UINT Thread2( LPVOID lp) 


{ 


CBitmap bmp; 

BITMAP bit; 

CDC cMemdc; 

CDC * dc; 

dc = CDC: :FronHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HIWORD(1p); 


CClientDC cdc(AfxGetApp() —» m pMainWnd); 
bmp.LoadBitmap(IDB BITMAP2); 

bmp. GetObject(sizeof(BITMAP), &bit); 
cMendc. CreateCompatibleDC(&cdc); 

cMendc. SelectObject(&bmp) ; 

for(posx = 10, posy = 44; posx < = 540; posx** ) 
{ 


cdc. BitBlt(posx, posy bit. bmWidth, bit. bmHeight, &cMendc, 0, 0, SRCCOPY) ; 


Sleep(7); 
) 


return 0; 


UINT Thread3(LPVOID 1p) 


{ 


CBitmap bmp; 

BITMAP bit; 

CDC cMendc; 

CDC * dc; 

dc = CDC: :FromHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HIWORD(1p); 
CClientDC cdc(AfxGetApp() 一 > m pMainWnd); 


bmp.LoadBitmap(IDB BITMAP3); 
bmp. GetObject(sizeof(BITMAP), &bit); 
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cMendc. CreateCompatibleDC(&cdc); 
cMemdc. SelectObject(&bmp); 


for(int posx- 10, posy = 84;posx« = 510;posx** ) 
{ 


cdc. BitBlt(posx, posy, bit. bmWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 
Sleep(5); 
} 


return 0; 
} 
UINT Thread4( LPVOID lp) 

{ 
CBitmap bmp; 
BITMAP bit; 
CDC cMendc; 
CDC * dc; 
dc = CDC: :FromHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HIWORD(1p); 


CClientDC cdc(AfxGetApp() -> m pMainWnd); 
bnp.LoadBitmap(IDB BITMAPA4); 

bmp. GetObject(sizeof(BITMAP), &bit); 

cMendc. CreateCompatibleDC(&cdc); 

cMendc. SelectObject(&bmp) ; 

for(int posx = 10, posy = 125; osx < = 580; posx** ) 
1 


cdc. BitBlt(posx, posy, bit. bmWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 
Sleep(7); 
} 


return 0; 

} 

UINT Thread5(LPVOID lp) 

t 
CBitmap bmp; 
BITMAP bit; 
CDC cMendc; 
CDC * dc; 
dc = CDC: :FromHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HIWORD( 1p) ; 


CClientDC cdc(AfxGetApp() -> m pMainiind); 
bmp.LoadBitmap(IDB BITMAP5); 

bmp. GetObject(sizeof(BITMAP), &bit); 
cMemdc. CreateCompatibleDC(&cdc); 

cMendc. SelectObject(&bmp) ; 
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for( int posx = 10, posy = 165;posx < = 570;posx++ ) 
{ 


cdc. BitBlt(posx, posy, bit. bmWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 


Sleep(9); 


return 0; 


UINT Thread6(LPVOID lp) 


{ 


CBitmap bmp; 

BITMAP bit; 

CDC cMemdc; 

CDC * dc; 

dc = CDC: : FronHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HIWORD(1p); 


CClientDC cdc(AfxGetApp() —> m pMainWnd); 

bmp. LoadBitmap(IDB BITMAPG); 

bmp. GetObject(sizeof(BITMAP), &bit); 

cMendc. CreateCompatibleDC(&cdc); 

cMendc. SelectObject(&bmp) ; 

for(int posx = 10, posy = 205;posx < = 530; posx** ) 
{ 


cdc. BitBlt(posx, posy, bit. bmWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 


Sleep(4); 
) 


return 0; 


UINT Thread7(LPVOID 1p) 


{ 


CBitmap bmp; 

BITMAP bit; 

CDC cMendc; 

CDC * dc; 

dc = CDC: :FromHandle( (HDC)LOWORD(1p)) ; 
int col; 


col = HIWORD( 1p) ; 


CClientDC cdc(AfxGetApp() 一 > m pMainWnd); 
bmp.LoadBitmap(IDB BITMAP7); 

bmp. GetObject(sizeof(BITMAP), &bit); 
cMemdc. CreateCompatibleDC(&cdc); 

cMendc. SelectObject(&bmp); 
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for(int posx = 10, posy = 245;posx« = 540; posx++ ) 
t 


cdc. BitBlt(posx, posy, bit. bmWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 
Sleep(3); 
) 


return 0; 


) 


UINT Thread8 (LPVOID lp) 

{ 
CBitmap bmp; 
BITMAP bit; 
CDC cMendc; 
CDC * dc; 
dc = CDC: :FromHandle( (HDC) LOWORD(1p) ) ; 
int col; 
col = HIWORD(1p); 
CClientDC cdc(AfxGetApp() —» m pMainiind) ; 
bnp.LoadBitmap(IDB BITMAPB); 
bmp. GetObject (sizeof (BITMAP), &bit); 
cMendc. CreateCompatibleDC(&cdc); 
cMendc. SelectObject(&bmp) ; 
for(int posx = 10, posy = 300; posx < = 500; posx++ ) 
t 

cdc. BitBlt(posx, posy, bit. bnWidth, bit. bnHeight, &cMemdc, 0, 0, SRCCOPY) ; 
Sleep(8); 
} 


return 0; 


UINT Thread9(LPVOID lp) 
{ 

CBitmap bmp; 
BITMAP bit; 
CDC cMendc; 
CDC * dc; 
dc = CDC: :FromHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HINORD(1p); 


CClientDC cdc(AfxGetApp() —»m pMainiind); 

bmp. LoadBitmap(IDB BITMAP9); 

bnp. GetObject (sizeof (BITMAP), &bit); 

cMemdc. CreateCompatibleDC(&cdc); 

cMemdc. SelectObject(&bmp) ; 

for( int posx = 10, posy = 340;posx < = 500;posx++ ) 
4 


cdc. BitBlt(posx, posy bit. bmWidth, bit. bnHeight, &cMemdc, 0, 0, SRCCOPY) ; 
Sleep(10); 


第 7 章 


return 0; 


UINT Threadi0(LPVOID lp) 
{ 
CBitmap bmp; 
BITMAP bit; 
CDC cMendc; 
CDC * dc; 
dc = CDC: :FromHandle( (HDC) LOWORD(1p) ) ; 
int col; 


col = HIWORD(1p); 


CClientDC cdc(AfxGetApp() 一 > m pMainWnd); 
bmp. LoadBitmap(IDB BITMAP11); 

bmp. GetObject(sizeof(BITMAP), &bit); 
cMendc. CreateCompat ibleDC(&cdc) ; 

cMendc. SelectObject(&bmp) ; 


for(int posx- 30 , posy = 450; posx < = 600; posx++ ) 
{ 


cdc. BitBlt(posx, posy, bit. bnWidth, bit. bmHeight, &cMemdc, 0, 0, SRCCOPY) ; 
Sleep(12); 
i 


return 0; 


CMenu cm; 

class MyWindow:public CFrameWnd 

{ 

public: 

MyWindow( ) 

{ 
Create(0, "Threads of MFC"); 
cm. LoadMenu(IDR MENUl); 
SetMenu(&cm) ; 


) 

void q() 

( 
PostQuitMessage(0); 

) 


void Threads() 
{ 
AfxMessageBox("Starting..."); 


Windows 多 线程 编程 


323 


MA 


324, Windows 网 络 编程 案例 教程 


MV 


} 


DECLARE MESSAGE MAP() 
h 


BEGIN MESSAGE MAP(Myiindow, CFramelWnd) 
ON COMMAND(ID Q,q) 
END MESSAGE MAP() 


class MyWin:public CWinApp 
{ 
public: 
BOOL InitInstance() 
| 


MyWindow * x; 

x- new MyWindow; 

m pMainWnd- x; 

// 创 建 并 启动 9 名 运动 员 的 工作 线程 
pThreadl = AfxBeginThread(Threadl, x); 
pThread2 = A£xBeginThread(Thread2, x) ; 
pThread3 = A£xBeginThread(Thread3, x) ; 
pThread4 = A£xBeginThread(Thread4, x) ; 
pThread5 = AfxBeginThread(Thread5, x); 
pThread6 = AfxBeginThread(Thread6, x); 
pThread7 = AfxBeginThread(Thread?7,x); 
pThread8 = AfxBeginThread(ThreadB, x); 
pThread9 = AfxBeginThread(Thread9, x); 
// 创 建 并 启动 裁判 员 线程 

pThread10 = AfxBeginThread(ThreadlO, x); 


x — > Showlindow(SW SHOWMAXIMIZED); 
return 1; 


) 


}; 
MyWin App; // 主 线程 


对 于 该 程序 的 创建 和 调试 请 读者 参见 前 面 的 实例 ,此 处 不 再 袭 述 。 


(887 


. 什么 是 进程 ? 什么 是 线程 ? 两 者 有 何 关系 ? 

. 简 述 Win32 操作 系统 下 的 多 线程 编程 机 制 。 

用 户 界面 线程 和 工作 线程 有 何不 同 ? 

. 简 述 用 C 语言 运行 时 库 创建 多 线程 的 步 又。 

. 简 述 用 Win32 API 创建 多 线程 的 步骤 。 

. 简 述 创建 MFC 用 户 界 面 线程 的 步骤 。 

. 简 述 创建 MFC 工作 线程 的 步骤 。 

用 本 章 的 多 线程 技术 改写 前 面 的 FTP 客户 机 程序 。 


Qo nm o m > @ rn = 


WinPcap 编程 


WinPcap( Windows Packet Capture) 是 一 个 基于 Win32 平台 捕获 网 络 数据 包 并 进行 分 
析 的 开源 库 , 是 在 Windows 环境 下 进行 数据 链 路 层 访问 的 事实 上 的 行业 标准 。 它 允许 应 用 
程序 绕 过 协议 栈 捕 获 和 发 送 网 络 数据 包 , 提 供 了 若干 实用 功能 ,包括 内 核 级 的 包 过 滤 、 网 络 
统计 引擎 和 远程 数据 包 的 捕获 等 。 


6.1 WinPcap 概述 


Windows 下 的 网 络 应 用 程序 一 般 基 于 Windows 的 网 络 编程 框架 进行 开发 ,这 个 网 络 
编程 框架 在 第 1 章 用 表 1. 3 进行 了 归纳 ,那么 WinPcap 与 这 个 框架 有 何 区 别 呢 ? 

以 套 接 字 编 程 为 例 ,操作 系统 已 经 妥善 地 处 理 了 套 接 字 底 层 实 现 细 节 ( 例 如 协议 处 理 、 
封装 数据 包 等 ) ,提供 了 一 个 与 读 / 写 文件 类 似 的 套 接 字 编 程 接口 。 但 如 果 应 用 程序 需要 直 
接 访问 网 络 中 的 原始 数据 包 , 即 没有 被 操作 系统 利用 网 络 协议 处 理 过 的 数据 包 , 则 不 如 用 
WinPcap 方便 ,许多 知名 的 Sniffer 程序 都 是 基于 WinPcap 开发 和 实现 的 ,如 Wireshark 和 
WinDump 等 。 


8.1.1 WinPcap 的 功能 


1. WinPcap 的 主要 功能 


WinPcap 的 主要 功能 如 下 : 

(1) 捕获 原始 数据 包 ; 

(2) 在 数据 包 发 送 给 某 应 用 程序 之 前 ,根据 用 户 指定 的 规则 过 滤 数 据 包 ; 
(3) 将 原始 数据 包 通 过 网 络 发 送出 去 ; 

(4) 收集 并 统计 网 络 流量 信息 。 


2. WinPcap 适合 的 应 用 


WinPcap 主要 用 来 设计 网 络 工具 ,例如 具有 分 析 、 解 决 纷争 .安全 和 监视 功能 的 工具 。 
典型 应 用 有 网 络 与 协议 分 析 器 、 网 络 监视 器 、 网 络 流量 记录 器 、 网 络 流量 发 生 器 .用 户 级 网 
桥 及 路 由 、 网 络 人 侵 检测 系统 、 网 络 扫描 器 、 安 全 工具 等 。 
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3. WinPcap 不 适合 的 应 用 


WinPcap 能 独立 地 通过 主机 协议 发 送 和 接收 数据 , 绕 过 了 TCP/IP 协议 栈 。 这 同时 也 
意味 着 WinPcap 不 能 阻止 \ 过 滤 或 操纵 同一 主机 上 的 使 用 TCP/IP 通信 的 应 用 程序 的 行 
为 , 它 仅 仅 能 简单 地 “监视 ”在 网 络 上 传输 的 数据 包 。 


8.1.2 Wireshark 网 络 分 析 工 具 


Wireshark 是 一 个 开源 网 络 数据 包 分 析 软 件 , Wireshark 广 为 流 行 不 仅 因为 免费 ,更 因 
其 功能 强大 ,网 络 管理 员 可 以 使 用 它 来 解决 网 络 问题 ,网 络 安全 工程 师 可 以 使 用 它 来 检查 安 
全 问题 ,开发 人 员 可 以 使 用 它 来 调试 协议 的 实现 ,学 习 者 可 以 使 用 它 来 了 解 和 学 习 网 络 
协议 。 

Wireshark 可 以 从 一 个 网 络 接口 实时 监测 、 捕 提 流 经 的 各 种 数据 包 , 保 存 捕获 的 数据 
包 , 对 特定 类 型 的 数据 包 进 行 检索 和 过 滤 , 统 计 、 分 析 各 类 数据 包 , 深 入 分 析 检 视 数 据 包 内 容 
等 。 图 8. 1 所 示 为 Wireshark 实时 抓 取 本 地 网 卡 流 经 的 各 类 数据 包 的 一 个 工作 界面 。 

š Capturing from 本 地 连接 [Wireshark 1.10.1 (SV 


Elle Edit View Go Capture Analyze Statistics Telephony Tools Internals Help 
GHANA BAXS ASDF ER aaa EMM s» 


Expression... » 
FrotocclengtkInfo, oe ,ecp corny 
9667 1318. 30510 119.180. 32.238 154. DNS 87 Standard query Oxle8e 
9668 1318. 30609 202.102.154. 3 j. 32. DNS 299 standard query respon 


9669 1318. 31304 119.188. 96.120 .32. Tp 74 http > pammrarc [SYN, 
9670 1 .238 k: w TCP 62 pammratc > http [ACK] 


9672 1318. 31756 119. 180. 32.238 119.167.151.240 TCP 74 pamarpc > http [SYN 
9673 1318. 32152 119.188. 96.120 119.180.32.238 TCP 62 http > visitview [ACK 
9674 1318.32190119.188.96.120 — 119.180.32.238 TCP 1502 [TCP segment of a rea: 
9675 1318. 32190 119.188.96.120 119.180.32.238 HTTP 1075 HTTP/1.1 200 OK PE 
9676 1318. 32234 119.167.151.240 119.180. 32.238 TCP 74 http > pammrpc [SYN, |. 
477 1318 32558 110 188 OR 10^ — 110 van 35 228 Te R? heen 、mammrarr fare) 

» 


+ Frame 9671: 735 bytes on wire (5880 bits), 735 bytes captured (5880 bits) on interface 0 
s Ethernet II, Src: Giga-Byt 09:65:6d (00:24:14:09:65:64), Dst: HuaweiTe 15:02:7c (00:25:9 
a PPP-over-Ethernet Session 

a Point-to-Point Protocol 

& Internet Protocol version 4, src: 119.180.32.238 (119.180.32.238), Ost: 119.188.96.120 ( 
& Transmission Control Protocol, Src Port: pammratc (1632), Dst Port: http (80), Seq: 1, A 
a v 


0000 00 25 9e 15 d2 7c 00 24 1d 09 65 6d si .|S ..em.d.. 
0010 30 5d 02 cb 00 21 45 00 02 c9 51 0; ] e. 
0020 76 56 77 b4 20 ee 77 bc 

0030 20 2c b5 59 fe 64 50 18 

0040 54 20 2f 62 61 6f 2f 75 7 


|@ 91 7688: «le capture In progress» Fil... 


8.1 Wireshark 实时 抓 取 本 地 网 卡 数据 包 的 界面 


用 户 可 以 从 Wireshark 网 站 (http://www. wireshark. org/download. html) 获取 其 最 
新 版 本 。Wireshark 可 运行 于 所 有 主流 的 操作 系统 平台 。 在 Windows 平台 上 安装 
Wireshark ,需要 预 装 WinPcap, Wireshark 基于 WinPcap 开发 ,是 WinPcap 的 典型 应 用 。 


8.1.3 WinDump 网 络 嗅 探 工具 


WinDump 是 TcpDump 在 Windows 平台 上 的 移植 版 。TcpDump 是 一 款 在 UNIX 平 
台 上 流行 的 基于 命令 行 的 网 络 数据 包 分 析 和 嗅 探 工具 , 它 能 把 匹配 规则 的 数据 包 的 包头 给 
显示 出 来 。 用 户 可 以 使 用 这 个 工具 去 查找 网 络 问题 或 者 去 监视 网 络 上 的 状况 。 在 W. 
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Richard Stevens 的 大 作 《TCP/IP 详解 》 
讲解 TCP/IP. 

WinDump 是 一 款 免 费 的 命令 行 抓 包 分 析 工 具 , 是 WinPcap 的 经 典 应 用 之 一 。 
WinDump 与 TcpDump 完全 兼容 ,WinDump 使 用 WinPcap 库 抓 包 ,需要 预 装 WinPcap 。 

图 8. 2 所 示 为 WinDump 实时 监测 网 卡 抓 包工 作 界面 ,对 数据 包 分 析 的 结果 依赖 于 用 
户 在 网 络 协 议 分 析 方面 的 知识 和 经 验 。WinDump 目前 被 广泛 应 用 于 流量 分 析 、 入 侵 检 测 
等 领域 。 


一 中 , 通 篇 采用 TepDump 捕 提 的 数据 包 来 向 读者 


图 8.2 WinDump 实时 抓 包 界面 


8.1.4 WinPcap 的 获取 和 安装 


访问 WinPcap 的 官网 (http://www. winpcap. org/) ,可 以 获取 其 最 新 的 稳 
(截止 到 2013 4E 9 月 ) 。 根 据 需要 ,用户 可 以 下 载 WinPcap 的 3 种 安装 包 。 


版 本 4. 1. 3 


1. 下 载运 行 支持 包 WinPcap 4 1 3. exe 


WinPcap 4 1 3.exe 主要 包括 驱动 程序 和 动态 链接 库 (driver 十 DLLs) , WinPcap 4_1_ 
3. exe 是 为 运行 基于 WinPcap 开发 的 应 用 程序 准备 的 。 


2. WinPcap 开发 者 支持 包 WpdPack 4 1 2.zip 


截止 到 2013 4E 9 月 ,WinPcap 虽然 推出 了 4. 1. 3 版 的 运行 支持 包 , 但 开发 支持 包 仍 然 
是 4.1.2 版 。WpdPack_4_1_2. zip 包含 创建 基于 WinPcap 的 应 用 程序 所 需 的 文件 ,例如 头 
文件 . 库 文件 .参考 手册 和 完整 的 实例 (.h 十 . lib 十 manual 十 example) 等 ,是 专 为 网 络 应 用 开 
发 者 准备 的 。 


3. WinPcap 源码 包 WpcapSrc 4_1 2.zip 


WpcapSrc_4_1_2. zip 包含 了 wpcap. dll、packet. dll 以 及 各 种 驱动 程序 的 源码 ,可 以 在 
此 基础 上 扩展 升级 WinPcap 系统 架构 。 


328 


Nx 


Windows 网 络 编程 案例 教程 


8.1.5 WinPcap 工作 模型 


WinPcap 系统 由 网 络 组 包 过 滤器 NPF(Netgroup Packet Filter) ,动态 链接 库 packet. 
dll 和 wpcap. dll 三 者 组 成 ,如 图 8. 3 所 示 。NPF 是 WinPcap 
框架 的 内 核 部 分 ; packet. dll 是 底层 动态 链接 库 , wpcap. dll 是 
高 层 动态 链接 库 , 且 后 者 依赖 前 者 。 

WinPcap 的 功能 主要 由 NPF 体现 , NPF 能 直接 访问 网 络 
接口 驱动 程序 ,其 主要 功能 如 下 : 


应 用 程序 


0D 捕获 数 所 ~ 包 ， Leod -—-. jio 
(2) 发 送 数 据 包 ，; 内 核 层 
CD 过 滤 数据 包 ; NPF 
(A) 监听 引擎 。 Device Driver 
packet. dll 提供 了 底层 的 API, 可 以 直接 访问 驱动 程序 的 一 一 T ATS 

函数 库 ,并 且 依赖 于 微软 操作 系统 的 可 编程 接口 。 物理 网 络 


Packets 


wpcap. dll 提供 了 高 层 的 API, 这 些 API 的 函数 形式 与 
libpcap 完全 兼容 。 编 程 者 使 用 这 些 函数 可 以 在 不 考虑 网 络 硬 图 8.3 WinPeap 系统 结构 
件 和 操作 系统 的 情况 下 捕获 数据 。 


8.1.6 NPF 5 NDIS 的 关系 


网 络 驱动 接口 规范 NDIS(Network Driver Interface Specification) 是 为 网 络 接口 卡 NIC 
(Network Interface Card) 制 定 的 标准 API 接 口 。NDIS 的 主要 目的 是 允许 协议 驱动 程序 发 
送 和 接收 数据 包 时 无 须 关 心 特定 的 适配器 或 特定 的 Win32 操作 系统 。 

NDIS 定义 了 3 种 类 型 的 网 络 驱动 程序 。 


1. 网 卡 驱 动 程序 (NIC Driver) 


网 卡 驱 动 程序 是 网 卡 与 上 层 协议 驱动 程序 通信 的 接口 , 它 负 责 接收 来 自 上 层 的 数据 包 ， 
或 将 数据 包 发 送 到 上 层 协议 驱动 程序 ,同时 还 完成 处 理 中 断 等 工作 。 

2. 中 间 驱 动 程序 

中 间 了 驱动 程序 位 于 网 卡 驱动 程序 和 协议 驱动 程序 之 间 , 不 能 与 用 户 程序 直接 通信 。 它 
向 上 与 协议 驱动 程序 通信 ,向 下 与 底层 的 网 卡 驱动 程序 通信 。 

3. 协议 驱动 程序 

协议 驱动 程序 执行 具体 的 网 络 协议 ,如 IPX/SPX, TCP/IP 等 。 协 议 驱 动 程序 为 应 用 层 
客户 程序 提供 服务 ,接收 来 自 网 卡 或 中 间 驱 动 程序 的 信息 。 

NPF 是 作为 一 种 协议 驱动 程序 来 实现 的 ,屏蔽 了 底层 NIC 的 复杂 性 ,并 提供 了 对 网 络 


原始 流量 的 直接 观察 ,过 滤 、 监 控 、 统 计 和 抓 取 。 从 这 个 意义 上 讲 , NPF 是 属于 NDIS 的 概 
念 范畴 的 ,NPF 和 NDIS 的 关系 如 图 8.4 所 示 。 
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应 用 程序 | | 应 用 程序 | peg 


内 核 层 


Packets 物理 网 络 


图 8.4 NPF 与 NDIS 的 关系 


观察 图 8.4, 对 于 编程 者 了 解 NPF 的 作用 很 有 帮助 ,可 以 直观 地 看 到 NPF 是 应 用 程序 
访问 网 络 的 一 条 独立 路 径 ,完全 绕 开 了 TCP/IP. 


8.1.7. NPF 工作 模型 


NPF 支持 的 操作 主要 有 抓 包 \ 发 送 原始 数据 包 、 流 量 统计 和 内 核 级 数据 包 的 捕获 与 转 
储 等 。NPF 的 工作 模型 如 图 8.5 所 示 。 


1. 抓 包 


NPF 的 主要 功能 就 是 抓 包 , 即 从 网 络 上 捕获 数据 包 然 后 原封 不 动 地 传递 给 用 户 程序 分 
析 处 理 。 抓 包 过 程 主要 依赖 两 个 组 件 实现 ,一 个 是 包 过 滤器 , 另 一 个 是 内 核 缓冲 区 。 

1) 包 过 滤器 

包 过 滤器 决定 是 否 需 要 将 捕获 的 包 复 制 给 侦 听 程序 ,多 数 情况 下 ,应 用 程序 使 用 NPF 
过 滤器 拒绝 的 数据 包 远 远 比 接受 的 数据 包 多 得 多 ,因此 ,灵活 、 高 效 的 数据 包 过 滤器 是 决定 
NPF 性 能 的 关键 。 

NPF 数据 包 过 滤器 的 复杂 性 在 于 ,不 仅 要 决定 是 否 该 接受 数据 包 , 还 要 统计 数据 包 的 
字 节 数 。NPF 采用 的 是 BPF(BSD Packet Filter) 包 过 滤 机 制 。 例 如 ,如 果 用 户 程序 设 定 的 
过 滤 规 则 为 捕获 所 有 的 UDP 数据 包 , 程 序 调用 wpcap. dll 函数 实现 这 一 功能 。 程 序 被 编译 
成 BPF 程序 ,程序 判断 如 果 数 据 包 的 IP 协议 类 型 等 于 17 ,就 会 将 数据 包 注入 到 内 核 中 。 程 
序 会 对 每 一 个 数据 包 做 上 述 检查 ,只 有 符合 条 件 的 数据 包 才 被 接受 。 与 传统 协议 栈 不 同 的 
是 ,NPF 不 解释 数据 包 , 只 捕获 。 

2) 内 核 缓冲 区 

过 滤器 用 一 个 内 核 缓冲 区 来 存储 数据 包 , 以 避免 丢失 ,如 图 8.5 所 示 。 被 缓冲 的 数据 包 
会 在 头 部 添加 时 间 惟 和 大 小 的 信息 作为 包头 。 为 了 加 速 应 用 程序 读 取 缓冲 区 数据 包 的 速 
度 , 在 数据 包 之 间 插 入 数据 对 其 进行 填充 ,这 大 大 提高 了 性 能 ,因为 它 最 大 限度 地 减少 了 读 
取 次 数 。 如 果 缓 冲 区 已 满 而 一 个 新 的 数据 包 到 达 , 该 数据 包 会 被 丢弃 。packet. dll 与 
wpcap. dll 提供 了 函数 来 动态 调整 内 核 缓 冲 区 和 用 户 缓冲 区 大 小 ,以 适应 实际 需要 。 

用 户 缓冲 区 的 大 小 是 非常 重要 的 ,因为 它 决定 了 一 次 系统 调用 从 内 核 缓 冲 区 复制 到 用 
户 缓冲 区 的 最 大 数据 量 。 另 一 方面 ,内 核 缓冲 区 单 次 可 以 被 复制 的 最 小 数据 量 也 是 极其 重 
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要 的 , 它 决 定 了 需要 等 待 多 久 才 开 始 复制 。 对 于 实时 系统 而 言 , 快 速 抓 包 要 求 尽快 将 内 核 缓 


冲 区 中 的 数据 复制 到 用 户 缓冲 区 。 
抓 包 应 用 


转 储 应 用 


监控 应 用 


i 

T 

用 户 缓冲 区 1 
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S i 
内 1 
核 1 
B aag | 统计 引擎 | | 转 储 引擎 
NEE 网 络 分 路 器 


NIC Driver 


物理 网 络 
Packets 
图 8.5 NPF 的 工作 模型 


2. 发 送 原 始 数据 包 
NPF 允许 向 网 络 发 送 原始 数据 包 。 应 用 程序 执行 WriteFile() 调 用 NPF 设备 文件 发 送 


原始 数据 包 , 这 些 被 发 送 到 网 络 的 数据 包 绕 过 了 TCP/IP 协议 栈 ,因此 ,需要 在 应 用 程序 中 
封装 数据 包 的 包头 。 应 用 程序 通常 不 需要 添加 FCS, 因 为 它 是 由 网 络 适配器 硬件 计算 , 自 


动 连接 在 一 个 数据 包 的 末尾 的 。 

正常 情况 下 ,发 送 原始 数据 的 速率 不 会 很 高 ,因为 发 送 每 个 数据 包 都 需要 一 次 系统 调 
用 。 出 于 这 个 原因 ,为 单个 写 操作 附加 了 次 数 设 定 。 用 户 应 用 程序 可 以 设置 单个 数据 包 的 
重复 次 数 , 如 果 这 个 值 被 设置 为 1000, 写 人 的 每 一 个 原始 数据 包 将 被 发 送 1000 次 。 这 个 功 


能 可 以 用 于 测试 网 络 的 负荷 能 力 。 
3. 流量 统计 
WinPcap 提供 了 内 核 级 可 编程 的 统计 引擎 ,能 够 简单 地 统计 网 络 流量 。 应 用 程序 可 以 
收集 的 统计 数据 ,并 不 需要 复制 数据 包 到 应 用 程序 ,只 是 简单 地 接收 并 显示 从 统计 引擎 返回 
的 结果 ,这 可 避免 对 内 存 和 CPU 时 间 的 大 量 占用 。 


4. 内 核 级 数据 包 的 捕获 与 转 储 
NPF 可 直接 从 内 核 模式 将 抓 取 的 数据 保存 到 磁盘 ,图 8. 6 给 出 了 两 种 转 储 网 络 数 据 包 


的 方法 。 
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一 种 方法 是 沿 着 图 8. 6 中 的 黑色 箭头 ,每 一 个 数据 包 被 多 次 复制 ,通常 要 经 历 4 个 缓冲 
区 才能 最 后 进入 磁盘 中 。 这 4 个 缓冲 区 分 别 是 内 核 中 一 个 ,应 用 程序 中 两 个 ,设备 输出 文件 
=s 

另外 一 种 方法 是 启用 NPF 内 核 级 的 流量 记录 功能 ,NPF 直接 将 数据 包 存 人 文件 系统 ， 
如 图 8. 6 中 的 虚线 箭头 所 示 , 只 用 了 两 个 缓冲 区 ,这 种 内 核 级 数据 包 的 捕获 与 转 储 模 式 大 幅 
提高 了 系统 性 能 。 


应 用 程序 一 一 抓 包 流程 


用 
Paw e [c Lac Bite 
B š 
内 NPF xt 
核 || 缓冲 区 = 一 一 3 系统 
层 

Packets 磁盘 


图 8.6 内 核 级 数据 包 的 捕获 与 转 储 


8.1.8 WinPcap 开发 环境 配置 


在 VS2010 中 配置 WinPcap 开发 环境 的 方法 如 下 : 

CD 在 开发 主机 上 安装 运行 支持 包 WinPcap_4_1_3. exe, 如 果 已 安装 则 跳 过 此 步 。 

(2) 将 开发 者 支持 包 WpdPack_4_1_2. zip 解压 到 一 个 指定 目录 ,例如 D:N\WpdPack_4_ 
1_2, 如 果 已 完成 则 跳 过 此 步 。 开 发 包 中 包含 的 目录 结构 如 图 8.7 所 示 。 

G) 启动 VS2010, 创 建 一 个 新 项 目 , 如 图 8. 8 所 示 。 暂 定 项 目 名 称 为 Sniffer, 添 加 一 个 
源 文件 GetDeviceInfo. cpp 用 于 测试 。 


解决 方案 资源 管理 器 VEU. 


alda 
3 [n “Sniffer ” (1 个 项 | 
"rm s Nn 

C3 Examples-pcap a AX 

@ © Examples-remote s GRE 

C3 Include 3 GetDeviceInfo. cpp 

$ Lib a 资源 文件 

图 8.7 WpdPack 开发 包 目 录 8.8 Sniffer 项 目 方案 


(4) 在 项 目 名 称 上 右 击 ,然后 在 快捷 菜单 中 选择 “属性 ”命令 ,弹出 项 目 属性 对 话 框 ,将 
项 目 字符 集 改 为 “使 用 多 字 节 字符 集 ”, 如 图 8. 9 所 示 。 

(5) 定义 HAVE. REMOTE, 在 左 侧 的 树 形 配 置 目录 中 选择 C/C++ 下 面 的 “ 预 处 理 器 ”， 
在 右 侧 的 视窗 中 下 拉 “ 预 处 理 器 定义 ”列表 框 ,选择 “编辑 ”命令 ,添加 HAVE_REMOTE, 如 
图 8. 10 所 示 , 然 后 单 击 “ 确 定 ” 按 钮 完成 。 

(6) 如 果 有 需要 ,用 第 (5) 步 的 方法 继续 对 预 处 理 器 定义 WPCAP。 

(7) 为 VS2010 开发 环境 附加 WinPcap 的 include 目录 。 在 左 侧 的 树 形 配置 目录 中 选 
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Sniffer 属性 页 ? x 


EEO: i525 (Debug) 
s BARE 
配置 


A FAW: | 活动 Hin32) 

"ET 

输出 目录 

中 间 目 录 

目标 文件 名 

目标 文件 扩展 名 

WPP iyi RS 

生成 日 志文 件 

平台 工具 集 

启用 托管 增 量 生成 


日 RERUM 


配置 类 型 
xc 的 使 用 
ATL 的 使 用 
TR 
公共 语言 运行 时 支持 
全 程序 优化 


字符 集 
通知 编译 唤 使 用 指定 的 宇 行业， 帮助 解决 本 地 化 问题 。 


~ [REESS OW... 


] 
$(SolutionDir)$ (Configuration)\ 
S(Configuration)V 

S(Projectlizne) 

„ere 

5. cdf;*, cache, +. obj;*. ilk;*. Fesources;# tlb,#| 
$ (IntDir) M (ISBui dPro jectlane). 1og 

v100 

s 


应 用 程序 (. exe) 

使 用 标准 Windows KK 
不 使 用 ATL | 
使 用 多 字 节 字符 集 E 
lu | 


| 使 用 Unicode FFR 


Ë > 


At 取消 


E 


图 8.9 WE Sniffer 项 目的 字符 集 


REO: 活动 (Debus) 


由 浏览 信息 
让 生成 事件 
* ATXEKI 
s Mr 


x FÉR: | 活动 (Nin32) 
TARRE 
取消 预 处 理 器 定义 
取消 所 有 预 处 理 器 定义 
部 略 标准 包含 路 径 
预 处 理 到 文件 
预 处 理 取消 显示 行 号 
Li 


回 从 父 级 或 项 目 默 认 设置 继承 (IT) 


预 处 理 淮 定义 
定义 源 文件 的 预 处 理 符号 。 


预 处 理 器 定义 


* | 配置 管理 器 (0)... 
WIN32; DEBUG; CONSOLE;HAVE RENOTE;S(Prep. 


Li 


Cur ws] 


确定 职 消 


8.10 为 预 处 理 器 定义 HAVE_REMOTE 
FE C/C++ 下 面 的 “常规 ”, 在 右 侧 的 视窗 中 下 拉 “ 附 加 包含 目录 ”列表 框 ,选择 “编辑 "命令, 添 


加 “D:\WpdPack_4_1_2\Include”, 如 图 8. 11 所 示 , 然 后 单 击 “ 确 定 ” 按 钮 完成 。 


(8) 为 VS2010 添加 WinPcap 的 lib 目录 支持 。 在 左 侧 的 树 形 配 置 目录 中 选择 “链接 
器 ”下 面 的 “常规 ”, 在 右 侧 的 视窗 中 下 拉 “ 附 加 库 目 录 ” 列 表 框 ,选择 “编辑 "命令 ,添加 “D:\ 


WpdPack_4_1_2\Lib”, 如 图 8. 12 所 示 ,然后 单 击 “确定 ”按钮 完成 。 


(9) 为 项 目 添加 必要 的 库 文件 ,包括 wpcap. lib、ws2_32. lib 和 iphlpapi. lib。 在 左 侧 的 
树 形 配置 目录 中 选择 “链接 器 ”下面 的 “输入 ”, 在 右 侧 的 视窗 中 下 拉 “ 附 加 依赖 项 ”列表 框 , 选 


择 “ 编 辑 ” 命 令 ,添加 上 述 库 文件 ,如 图 8. 13 所 示 ,然后 单 击 “确定 ”按钮 完成 。 
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~ [gxgsBO... 


i: WpdPack 4.1 2Vinclude; (Addi tional Inc] 


BT MRH "EBIRHIUER UZ0 


E A SCRSEIR ES AOR I) 


确定 
附加 包含 目录 
指定 一 个 残 多 个 要 添加 到 包 寺 路 企 中 的 目录 ， 当 目 妇 不 止 一 个 时 ， 请 用 分 导 分 隔 。 — CIN. 


a] 


8.11 附加 WinPcap 的 include 目录 


RRO: masa) = *&0: [iso GE 
* a Ld VOutDiz)$ TargetNeme)$ (TargetExt) 
° 性 EST] 


we Bü 启用 增 量 链 按 是 CINCRERENTAL) 


回 从 父 级 或 项 目 默 认 设置 继承 (1) 


Lar J wn | 


wt | mi ][ emo 


图 8.12 附加 WinPcap 的 lib 目录 


? x 


| ERE: [活动 (Debus) M FER: [EA Pind) ~ [BR eco... 
| imam Wm wpcap. lib:ms2_32. lib; Iphlpapi. Lib; (Addi. 
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PAD PAGE IE 
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LLLI 
JEERUIUDSIUHE $T ARALAR kernel32. Lb] 


| 确定 J| mi | [应 用 (&) ] 


图 8.13 为 项 目 附 加 库 文件 依赖 项 
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用 户 也 可 在 源 程序 头 部 手动 添加 以 下 语句 ,获得 WinPcap 和 WinSock 的 支持 : 


# include < winsock. h> 
# pragma comment( lib, "wsock32.1ib" ) 


或 者 


# include < winsock2. h> 
# pragma comment( lib, "ws2 32.1lib" ) 


# define HAVE REMOTE 
# include " pcap. h" 
# pragma comment(lib, " wpcap. lib") 


6.2 WinPcap 编程 框架 


//WinSockl.1 3k 
//WinSocki.1 链接 库 


//WinSock2 头 
//WinSock2 链接 库 


//wpcap 链接 库 


WinPcap 结构 体 与 宏 定 义 、WinPcap API 函数 库 、 过 滤 串 表达 式 构 成 了 WinPcap 的 基 


本 编程 框架 。 
8.2.1 结构 体 与 宏 定义 


WinPcap 的 结构 体 与 宏 定 义 如 表 8. 1 所 示 。 
表 8.1 WinPcap 的 结构 体 与 宏 定义 


结构 体 


struct pcap_file_header 
struct pcap_pkthdr 
struct pcap_stat 

struct pcap_if 

struct pcap_addr 


libpcap 堆 文 件 首部 

堆 文件 中 包 的 首部 

保存 一 个 接口 统计 值 的 结构 体 

接口 列表 中 的 一 项 ,在 pcap_findalldevs() 中 使 用 
表示 一 个 接口 地 址 ,在 pcap_findalldevs() 中 使 用 


宏 定 义 


# define PCAP_VERSION_MAJOR 2 

# define PCAP_VERSION_MINOR 4 

# define PCAP ERRBUF SIZE 256 

# define PCAP IF LOOPBACK 0x00000001 
# define MODE CAPT 0 

* define MODE STAT 1 


主要 libpcap 堆 文件 版 本 

次 要 libpcap 堆 文件 版 本 

libpcap 错误 信息 缓存 的 大 小 

接口 是 回调 的 (interface is loopback) 
捕捉 模式 ,在 调用 pcap_setmode() 时 使 用 
统计 模式 ,在 调用 pcap_setmode() 时 使 用 


自 定义 类 型 


typedef int bpf_int32 
typedef u_int bpf_u_int32 
typedef pcap pcap_t 


typedef pcap_dumper pcap_dumper_t 
typedef pcap_if pcap_if_t 
typedef pcap_addr pcap addr t 


32 位 的 整数 

32 位 的 无 符号 整数 

一 个 已 打开 的 捕捉 实例 的 描述 符 。 这 个 结构 体 对 于 用 户 来 
说 是 不 透明 的 , 它 通过 wpcap. dll 提供 的 函数 维护 了 内 容 
libpcap 存储 文件 的 描述 符 

接口 列表 中 的 一 项 ,参见 peap if 

表示 一 个 接口 地 址 ,参见 pcap_addr 
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8.2.2 WinPcap API 函数 


WinPcap API 有 一 些 函 数 源 自 libpcap 库 , 既 能 运行 于 Windows 平台 ,也 能 运行 于 
Linux 平台 ,在 此 将 这 些 函 数 归 纳 为 表 8.2, 


表 8.2 与 Linux 兼容 的 函数 


typedef void( * ) 


pcap handler (u char * user, const struct pcap pkthdr * pkt header, const 
u char * pkt data) 


接受 数据 包 的 回调 函数 的 原型 


pcap open live (const char * device, int snaplen, int promisc, int to ms, 


pcap t * char * ebuf) 

在 网 络 中 打开 一 个 活动 的 捕获 

pcap_open_dead (int linktype，int snaplen) 
在 还 没有 开始 捕获 时 ,创建 一 个 pcap_t 的 结构 体 
— pcap. open offline (const char * fname, char * errbuf? 


打开 一 个 tepdump/libpcap 格式 的 文件 来 读 取 数 据 包 


pcap dumper t * 


pcap dump open (pcap t * p, const char * fname) 


打开 一 个 文件 来 写 人 数据 包 


pcap setnonblock (pcap t * p, int nonblock, char * errbuf) 


i 在 阻塞 和 非 阻塞 模式 之 间 切 换 
- pcap getnonblock (pcap t * p, char * errbuf) 
获得 一 个 接口 的 非 阻塞 状态 信息 
ini pcap_findalldevs (pcap_if_t ** alldevsp, char * errbuf) 
构造 一 个 可 打开 的 网 络 设备 的 列表 pcap. open. liveO 
void pcap freealldevs (pcap if t * alldevsp) 
释放 一 个 接口 列表 ,这 个 列表 将 被 pcap_findalldevs() 返 回 
dus pcap. lookupdev (char * errbuf) 
返回 系统 中 第 一 个 合法 的 设备 
pcap lookupnet (const char * device, bpf_u_int32 * netp, bpf_u_int32 * 
int maskp, char * errbuf) 
返回 接口 的 子 网 和 掩 码 
pcap. dispatch (pcap_t * p. int cnt, pcap_handler callback, u_char * user) 
收集 一 组 数据 包 
T pcap loop (pcap t * p, int cnt, pcap handler callback, u char * user) 
收集 一 组 数据 包 
liac pcap next (pcap t * p. struct pcap pkthdr * h) 
li 返回 下 一 个 可 用 的 数据 包 
pcap next ex (pcap t * p+ struct pcap_pkthdr ** pkt_header, const u char 
int ** pkt data) 
从 一 个 设备 接口 或 者 从 一 个 脱 机 文件 中 读 取 一 个 数据 包 
pcap_breakloop (pcap t * ) 
void 设置 一 个 标志 位 ,这 个 标志 位 会 强制 pcap_dispatch() 或 pcap_loop() 返 回 , 而 


不 是 继续 循环 
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续 表 


int 


pcap sendpacket (pcap t * p. u_char * buf, int size) 
发 送 一 个 原始 数据 包 


void 


pcap dump (u_char * user. const struct pcap_pkthdr * h, const u char * sp) 
将 数据 包 保存 到 磁盘 


long 


pcap dump ftell (pcap dumper t * ) 
返回 存储 文件 的 文件 位 置 


int 


pcap. compile (pcap _t * p, struct bpf program * fp. char * str. int 
optimize, bpf u int32 netmask) 

编译 数据 包 过 滤器 ,将 程序 中 高 级 的 过 滤 表 达 式 转换 成 能 被 内 核 级 的 过 滤 引 
擎 所 处 理 的 形式 


int 


pcap compile nopcap (int snaplen_arg, int linktype_arg, struct bpf program 
* program. char * buf, int optimize, bpf u int32 mask) 

在 不 需要 打开 适配器 的 情况 下 ,编译 数据 包 过 滤器 。 这 个 函数 能 将 程序 中 高 
级 的 过 滤 表 达 式 转换 成 能 被 内 核 级 的 过 滤 引 擎 所 处 理 的 形式 (参见 过 滤 表 达 
式 语 法 ) 


int 


pcap setfilter (pcap t * p. struct bpf program * fp) 
在 捕获 过 程 中 绑 定 一 个 过 滤器 


void 


pcap_freecode (struct bpf_program * fp) 
释放 一 个 过 滤器 


int 


pcap_datalink (pcap t * p) 
返回 适配器 的 链 路 层 


int 


pcap list datalinks (pcap t * p, int ** dlt buf) 
列 出 数据 链 


int 


pcap_set_datalink (pcap_t * p» int dlt) 
将 当前 pcap 描述 符 的 数据 链 的 类 型 设置 成 dlt 给 出 的 类 型 ,如 果 返 回 一 1 表 
示 设 置 失败 


int 


pcap. datalink name to val (const char * name) 
转换 一 个 数据 链 类 型 的 名 字 , 即 将 具有 DLT remove 的 DLT_name, 转 换 成 
符合 数据 链 类 型 的 值 。 该 转换 是 区 分 大 小 写 的 ,如 果 返 回 一 1 表示 转换 失败 


const char * 


pcap. datalink val to name (int dlt) 
将 数据 链 类 型 的 值 转换 成 合适 的 数据 链 类 型 的 名 字 , 如 果 返 回 NULL 表示 
转换 失败 


const char * 


pcap. datalink val to description (int dlt) 
将 数据 链 类 型 的 值 转换 成 合适 的 数据 链 类 型 的 简短 的 名 字 , 如 果 返 回 NULL 
表示 转换 失败 


int 


pcap snapshot (pcap t * p) 
返回 发 送 给 应 用 程序 的 数据 包 部 分 的 大 小 ( 字 节 ) 


int 


pcap is swapped (pcap t * p) 
当前 存储 文件 使 用 与 当前 系统 不 同 的 字 节 序列 时 ,返回 TRUE. 


int 


pcap major version (pcap t * p) 


返回 正在 用 来 写 人 存储 文件 的 pcap 库 的 主要 版 本 号 


int 


pcap minor version (pcap t * p) 


返回 正在 用 来 写 人 存储 文件 的 pcap 库 的 次 要 版 本 号 
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FILE * 


pcap file (pcap t * p) 
返回 一 个 脱 机 捕获 文件 的 标准 流 


int 


pcap stats (pcap t * p. struct pcap stat * ps) 


返回 当前 捕获 的 统计 信息 


void 


pcap perror (pcap t * p, char * prefix) 


打印 最 后 一 次 pcap 库 错 误 的 文本 信息 ,前 级 是 prefix 


char * 


pcap geterr (pcap t * p) 
返回 最 后 一 次 pcap 库 错误 的 文本 信息 


char * 


pcap. strerror (int error) 


提供 这 个 函数 ,以 防 strerrorO 函数 不 能 使 用 


const char * 


pcap lib version (void) 
返回 一 个 字符 串 ,这 个 字符 串 保 存 着 libpeap 库 的 版 本 信息 。 注 意 , 它 除 了 版 
本 号 以 外 ,还 包含 了 很 多 信息 


void 


pcap. close (pcap_t * p) 
关闭 一 个 和 p 关联 的 文件 ,并 释放 资源 


FILE * 


pcap dump file (pcap dumper t * p) 
返回 一 个 由 pcap_dump_open() 打 开 的 存储 文件 的 标准 输入 /输出 流 


int 


pcap_dump_flush (pcap_dumper_t * p) 

将 输出 缓冲 写 人 文件 ,这 样 ,任何 使 用 pcap_dump() 存 储 但 还 没有 写 人 文件 
的 数据 包 , 会 被 立刻 写 和 人 文件。 如 果 返 回 一 1 表示 出 错 , 如 果 返 回 0 表示 
成 功 


void 


pcap dump close (pcap dumper t * p) 
关闭 三 个 文体 


WinPcap 有 一 部 分 函数 是 从 libpcap 扩展 而 来 的 ,提供 了 远程 数据 包 捕获 、 数 据 包 缓冲 
区 动态 调整 和 数据 包 注 入 等 新 功能 ,这 些 函 数 只 适用 于 Windows 平台 ,在 此 归纳 为 表 8. 3。 


PAirpcapHandle 


表 8.3 Windows 平 台 专用 的 扩展 函数 
pcap get airpcap handle (pcap_t * p) 
返回 一 个 和 适配器 相关 联 的 AirPcap 句柄 。 这 个 句柄 可 以 被 用 来 改变 和 
CACE 无 线 技 术 有 关 的 设置 


bool 


pcap_offline_filter (struct bpf program * prog. const struct pcap_pkthdr * 
header. const u char * pkt data) 


当 给 定 的 过 滤器 应 用 于 一 个 脱 机 数据 包 时 ,返回 TRUE 


int 


pcap live dump (pcap t * p, char * filename. int maxsize, int maxpacks) 


将 捕获 保存 到 文件 


int 


pcap live dump ended (pcap t * p. int sync) 


返回 内 核 堆 处 理 的 状态 


pcap stat * 


pcap stats ex (pcap t * p, int * pcap stat size) 


返回 当前 捕获 的 统计 信息 


int 


pcap_setbuff (pcap t * p, int dim) 
设置 与 当前 适配器 关联 的 内 核 缓存 大 小 


int 


pcap setmode (pcap_t * p. int mode) 


将 接口 p 的 工作 模式 设置 为 mode 
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续 表 
- pcap setmintocopy (pcap t * p, int size) 
T 设置 内 核 一 次 调用 所 收 到 的 最 小 数据 总 数 
HANDLE pcap getevent (pcap t * p) 


返回 与 接口 p 关联 的 事件 句柄 

pcap sendqueue alloc (u int memsize) 

分 配 一 个 发 送 队列 

pcap sendqueue destroy (pcap send queue * queue) 
销毁 一 个 发 送 队列 


pcap_sendqueue_queue( pcap_send_queue * queue，const struct pcap_pkthdr 


pcap send queue * 


void 


int * pkt header, const u char * pkt data) 

将 数据 包 加 入 到 发 送 队 列 

pcap_sendqueue_transmit (pcap t * p, pcap send queue * queue, int sync) 
将 一 个 发 送 队列 发 送 至 网 络 


pcap findalldevs ex (char * source, struct pcap_rmtauth * auth, pcap if t 


u int 


int ** alldevs. char * errbuf) 
创建 一 个 网 络 设备 列表 ,它们 可 以 由 pcap_open() 打 开 


pcap_createsrcstr (char * source, int type, const char * host, const char * 


port. const char * name, char * errbuf) 
接收 一 组 字符 串 (hot、name、port、…*) ,并 根据 新 的 格式 返回 一 个 完整 的 源 字 
符 串 (例如 ,rpcap://1. 2. 3. 4/eth0”) 


pcap. parsesrcstr (const char * source, int * type. char * host, char * port. 


int 


int char * name, char * errbuf) 
解析 一 个 源 字符 串 , 并 返回 分 离 出 来 的 内 容 


pcap open (const char * source. int snaplen, int flags. int read. timeout. 


pcap t * struct pcap rmtauth * auth, char * errbuf) 

打开 一 个 用 来 捕获 或 发 送 流量 ( 仅 WinPcap) 的 通用 源 
pcap_setsampling (pcap t * p) 

为 数据 包 捕获 .定义 一 个 采样 方法 


pcap remoteact accept (const char * address, const char * port, const char * 


pcap samp * 


SOCKET hostlist, char * connectinghost. struct pcap rmtauth * auth. char * errbuf) 
阻塞 ,直到 网 络 连接 建立 ( 仅 用 于 激活 模式 ) 


pcap remoteact close (const char * host. char * errbuf) 


nh 释放 一 个 活动 连接 ( 仅 用 于 激活 模式 ) 
id pcap remoteact cleanup () 
"m 清除 一 个 正在 用 来 等 待 活动 连接 的 Socket 
i pcap remoteact list (char * hostlist, char sep, int size, char * errbuf) 


返回 一 个 主机 名 ,这 个 主机 和 当前 用 户 建立 了 活动 连接 ( 仅 用 于 激活 模式 ) 


8.2.3 过 滤器 表达 式 


WinPcap 的 过 滤器 是 一 个 用 ASCII 字符 串 构建 的 表达 式 。pcap_compile() 函数 负责 把 
这 个 字符 串 表 达 式 编译 成 内 核 级 的 包 过 滤器 。 
如 果 不 设 定 过 滤器 表达 式 , 那 么 ,网 络 上 所 有 的 包 都 会 被 内 核 过 滤 引 擎 所 接受 ,否则 只 
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有 满足 过 滤器 表达 式 的 数据 包 才 会 被 选中 。 
过 滤器 表达 式 由 一 个 或 多 个 原 语 组 成 ,WinPcap 主要 包括 以 下 3 种 原 语 : 


1. 类 型 原 语 


类 型 原 语 指明 了 过 滤器 匹配 的 对 象 类 型 ,包括 host, net 和 port 3 种 。 例 如 “host 
foo" “net 128. 3” 和 “port 20” 是 3 个 用 类 型 原 语 构建 的 过 滤器 表达 式 。 如 果 过 滤器 表达 式 
中 没有 指明 类 型 原 语 , 则 假定 是 host. 


2. 方向 原 语 


方向 原 语 指 明了 过 滤器 匹配 的 数据 传输 方向 ,包括 sre. dst 和 src or dst 3 种 。 例 如 ， 
“src foo” “dst net 128. 3” 和 “src or dst port ftp-data” 是 3 个 用 方向 原 语 和 类 型 原 语 联合 构 
建 的 过 滤器 表达 式 。 如 果 不 指定 方向 原 语 , 则 假定 是 src or dst. 


3. 协议 原 语 


协议 原 语 指 明了 过 滤器 匹配 的 协议 ,包括 ether, fddi,tr,ip,ip6,arp,rarp,decnet, tep 和 
udp。 例 如 ,“ether src foo”、“arp net 128. 3” “tcp port 21” 这 3 个 过 滤器 表达 式 中 既 有 协议 
原 语 , 又 有 方向 原 语 和 类 型 原 语 。 

如 果 不 指定 协议 原 语 , 那 么 就 假定 所 有 的 协议 都 会 被 允许 。 例 如 ,“src foo" s ffr T" Cip 
or arp or rarp) src foo”,“net bar” 等 价 于 “(ip or arp or rarp) net bar”,“port 53” 等 价 于 
“(tep or udp) port 53", 

“fddi” 通 常 是 “ether” 的 别名 ,fddi 的 首部 包含 了 和 以 太 网 很 相似 的 源 地 址 和 目的 地 址 ， 
并 且 通 常 包含 了 和 以 太 网 很 相似 的 数据 包 类 型 。 所 以 ,在 fddi 网 域 上 使 用 过 滤器 和 在 以 太 
网 上 使 用 过 滤器 基本 一 致 。 

用 户 可 以 使 用 and, or 或 not 将 原 语 连接 起 来 ,构造 一 个 更 复杂 的 过 滤器 表达 式 。 例 
如 ,“host foo and not port ftp and not port ftp-data”。 为 了 简化 ,在 过 滤器 表达 式 前 面 已 列 
出 的 原 语 ,在 同一 过 滤器 表达 式 的 后 面 可 以 省 略 。 例 如 , “tcp dst port ftp or ftp-data or 
domain” 和 “tcp dst port ftp or tcp dst port ftp-data or tcp dst port domain” 是 完全 等 价 的 ， 
前 者 省 略 了 重复 的 原 语 。 

关于 过 滤器 表达 式 的 更 多 构建 方法 ,请 读者 参见 WinPcap 技术 文档 。 


8.2.4 程序 的 创建 和 测试 


用 Visual C++ 2010 创建 ,编译 和 测试 WinPcap 应 用 程序 的 基本 步骤 如 下 : 

(1) 启动 VS2010 创建 新 工程 项 目 。 

(2) 开发 环境 配置 工作 。 

其 配置 要 点 如 下 : 

CD 在 每 一 个 使 用 了 库 的 源 程序 中 ,将 pcap. h 头 文件 包含 (include) 进 来 。 

© 如 果 在 程序 中 使 用 了 WinPcap 中 提供 给 Win32 平台 的 特有 函数 ,需要 在 预 处 理 中 
加 入 WPCAP 的 定义 。 

© 如 果 程 序 使 用 了 WinPcap 的 远程 捕获 功能 ,那么 在 预 处 理 定义 中 加 入 HAVE_ 
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REMOTE ,注意 ,不 要 把 remote-ext. h 直接 加 入 到 源 文件 中 。 
@ 设置 VC++ 的 链接 器 (Linker) ,把 wpcap. lib 库 文件 包含 进来 。wpcap. lib 可 以 在 
WinPcap 中 找到 。 
© 需要 时 ,设置 VC++ 的 链接 器 (Linker) ,把 ws2_32. lib 库 文件 包含 进来 。 
具体 设置 参照 前 面 的 WinPcap 开发 环境 配置 。 
G) 实现 业务 逻辑 编码 。 
(4) 编译 和 测试 。 


6.3 WinPcap 编程 应 用 


基于 8.2 节 介 绍 的 WinPcap 编程 框架 ,本 节 利 用 WinPcap API 来 演示 一 些 基 本 的 
WinPcap 编程 应 用 ,例如 获取 网 络 适配器 列表 、 获 取 网 卡 描述 和 地 址 列表 .从 网 卡 捕获 数据 
包 、 保 存 数据 包 到 磁盘 、 创 建 数据 包 过 滤器 .分 析 数 据 包 和 统计 网 络 流量 等 。 


8.3.1 获取 网 络 设 备 列表 


通常 ,编写 WinPcap 程序 的 第 一 件 事情 就 是 获取 已 连接 的 网 络 适配器 列表 。libpcap 
和 WinPcap 都 提供 了 pcap_findalldevs_ex() 函 数 来 实现 这 个 功能 。 这 个 函数 返回 一 个 
pcap if 结构 的 链表 ,pcap_if 结构 包含 了 适配器 的 详细 信息 ,其 中 ,数据 域 name 表示 适配器 
名 称 , 数 据 域 description 表示 适配器 描述 信息 。 


程序 8. 1 获取 适配器 列表 ,并 在 屏幕 上 显示 出 来 ,如 果 没 有 找到 适配器 ,将 打印 错误 


程序 8.1 获取 网 络 设备 列表 完整 代码 


//GetDeviceInfo. cpp: 获取 设备 列表 
# include "pcap. h" 
int main() 
{ 
pcap if t * alldevs; 
pcap if t *d; 
inti-0; 
char errbuf[PCAP ERRBUF SIZE]; 
/* 获取 本 地 机 器 设备 列表 < / 
if (pcap findalldevs ex(PCAP SRC IF STRING, NULL / * 不 需要 认证 */,&alldevs, errbuf) == -1) 
t 
fprintf(stderr, "pcap_findalldevs_ex 返回 设备 列表 错误 : * s\n", errbuf); 
exit(1); 
} 
/* 打印 列表 * / 
for(d= alldevs; d != NULL; d= d-> next) 
{ 
printf("%d. % s", ++i, d—>name); 
if (d-> description) 
printf(" ( %s)\n", d-> description); 
else 


printf(”( 无 描述 信息 )\n"); 


) 
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printf("\n 没有 找到 设备 列表 ! 确认 WinPcap 已 经 正确 安装 ...\n"); 


return 0; 


/* 不 再 需要 设备 列表 了 ,释放 它 * / 
pcap freealldevs(alldevs); 
return 0; 


) 


编译 .运行 这 个 程序 ,需要 在 VS2010 中 创建 一 个 Win32 控制 台 空 项 目 ,然后 添加 上 述 
程序 文件 ,并 按照 前 面 介绍 的 WinPcap 开发 环境 配置 方法 进行 编译 配置 。 该 程序 的 运行 结 
果 如 图 8. 14 所 示 。 


图 8.14 获取 设备 列表 


读者 可 以 通过 控制 面板 查看 本 机 配置 的 网 络 适配器 ,与 图 8. 14 结果 进行 对 照 ,不 难 发 
现 设 备 制造 商 \ 设 备 名 称 等 描述 信息 是 一 致 的 。 对 于 安装 有 多 块 网 卡 的 主机 ,程序 8. 1 会 以 
列表 形式 返回 。 


8. 


3.2 打开 适配器 捕获 数据 包 


大 家 现在 已 经 知道 如 何 获取 适配器 的 信息 了 ,下 面 开 始 一 项 更 有 意义 的 工作 , 即 打开 适 
配器 并 捕获 数据 包 。 下 面 给 出 的 程序 8. 2 会 将 每 一 个 通过 适配器 的 数据 包 打 印 出 来 。 
打开 设备 的 函数 是 pcap_open() ,该 函数 的 语法 如 下 : 


pcap t* pcap open ( const char * source, 


) 


int snaplen, 

int flags, 

int read timeout, 

struct pcap rmtauth * auth, 
char * errbuf 


其 中 部 分 参数 的 含义 如 下 。 
* snaplen: 指定 要 捕获 数据 包 中 的 哪些 部 分 。 在 一 些 操作 系统 中 (例如 xBSD 和 


Win32) ,驱动 可 以 被 配置 成 只 捕获 数据 包 的 初始 化 部 分 ,这 样 可 以 减少 应 月 


程序 间 


复制 数据 的 工作 量 , 从 而 提高 捕获 效率 。 在 本 例 中 ,将 其 值 设 定 为 65 535, 这 上 比 能 遇 


到 的 最 大 的 MTU 还 要 大 ,从 而 确保 能 够 收 到 完整 的 数据 包 。 


flags: 用 来 指示 适配器 是 否 要 被 设置 成 混杂 模式 。 一 般 情况 下 ,适配器 只 接收 发 给 
它 自己 的 数据 包 , 而 对 于 那些 在 其 他 机 器 之 间 通 信 的 数据 包 将 会 被 丢弃 。 如 果 适 配 
器 是 混杂 模式 ,那么 不 管 这 个 数据 包 是 不 是 发 给 它 的 , 它 都 会 去 捕获 。 也 就 是 说 , 混 


杂 模 式 捕获 所 有 的 数据 包 。 
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* read timeout; 指定 读 取 数 据 的 超时 时 间 , 以 毫秒 计 (1s 二 1000ms)。 在 适配器 上 进 
行 读 取 操 作 ( 例 如 用 pcap_dispatch() 或 pcap_next_ex()) 都 会 在 read. timeout 毫秒 
时 间 内 响应 。 将 read timeout 设置 为 0, 意味 着 没有 超时 限制 ,如 果 没 有 数据 包 到 
达 , 读 操作 将 继续 读 下 去 而 不 返回 。 如 果 设置 成 一 1, 则 情况 恰好 相反 ,无 论 有 没有 
数据 包 到 达 , 读 操作 都 会 立即 返回 。 

程序 8.2 ”打开 适配器 并 捕获 数据 包 完 整 代码 


//CaptureAllPackets. cpp: 捕获 数据 包 

# include "pcap. h" 

/ * packet handler 函数 原型  / 

void packet handler(u char * param, const struct pcap pkthdr * header, 
const u char * pkt data); 


int main() 
{ 
pcap if t *alldevs; 
pcap if t *d; 
int inum; 
int i=0; 
pcap_t * adhandle; 
char errbuf[PCAP ERRBUF SIZE]; 
/* 获取 本 机 设备 列表 x / 
if (pcap findalldevs ex(PCAP SRC IF STRING, NULL, 
&alldevs, errbuf) == 一 1) 
{ 
fprintf(stderr, "获取 设备 列表 错误 : % s\n", errbuf); 
exit(1); 
) 
/* 打印 列表 * / 
for(d- alldevs; d; d = d-» next) 
{ 
printf(" $d. %s", ++i, d-» name); 
if (d-> description) 
printf(" (%s)\n", d-> description); 
else 
printf(”( 无 法 获取 设备 描述 信息 )\n"); 
} 
if(i== 0) 


printf("\n 没有 找到 设备 ! 确认 WinPcap 正确 安装 .\n"); 
return 一 17 
) 
printf(" 输 入 设备 列表 中 的 设备 序号 (1- &d):",i); 
scanf(" % d", &inum); 
if(inum«1 || inum» i) 
t 
printf("\n 设备 序号 超出 范围 \n"); 
/* 释放 设备 列表 x / 
pcap freealldevs(alldevs); 
return -1; 
j 
/* 跳 转 到 选中 的 适配器 */ 
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for(d=alldevs, i=0; i< inum- 1 ;d- d-» next, i++); 


/* 打开 设备 * / 

if ( (adhandle = pcap open(d-» name, // 设 备 名 

65536, //65 535 保证 能 捕获 到 不 同 数据 链 路 层 上 的 每 
// 个 数据 包 的 全 部 内 容 

PCAP OPENFLAG PROMISCUOUS, // 混 杂 模 式 

1000, // 读 取 超 时 时 间 

NULL, // 远 程 机 器 验证 

errbuf // 错 误 缓冲 池 

)) == NULL) 


t 
fprintf (stderr, "\n 不 能 打开 适配器 . % s WinPcap 不 支持 该 适配器 !\n"， 
d-» name); 
/* 释放 设备 列表 < / 
pcap freealldevs(alldevs); 
return - 1; 
) 
printf("\n 开始 侦 听 % s...Vn", d—» description); 
/* 释放 设备 列表 < / 
pcap freealldevs(alldevs); 
/* 开始 捕获 * / 
pcap loop(adhandle, 0, packet handler, NULL); 
return 0; 


) 


// 每 次 捕获 到 数据 包 时 , Libpcap 都 会 自动 调用 这 个 回调 函数 
void packet handler(u char * param, const struct pcap pkthdr * header,const u char * pkt 
data) 
( 

struct tm * ltime; 

char timestr[16]; 

time t local tv sec; 

/ * 将 时 间 戳 转换 成 可 识别 的 格式 * / 

local tv sec = header ->ts.tv sec; 

ltime- localtime(&local tv sec); 

strftime( timestr, sizeof timestr, " % H: % M: €S", ltime); 

printf(" % s, % .6d len: % d\n", timestr, header -> ts.tv usec, header -> len); 
) 


pcap dispatch) fll pcap_loop() 两 个 函数 非常 相似 ,区 别 是 pcap_ dispatch() 当 超时 时 
间 到 了 时 (timeout expires) 就 返回 (尽管 不 能 保证 ) ,而 pcap_loop() 不 会 因此 而 返回 ,只 有 
当 ent 个 数据 包 被 捕获 时 才 返 回 , 所 以 ,pcap_loop() 会 在 一 小 段 时 间 内 阻塞 网 络 。pcap_ 
loop() 对 于 程序 8. 2 这 个 简单 的 实例 来 说 可 以 满足 需求 ,pcap_dispatch( ) 函 数 一 般 用 于 比 
较 复杂 的 情况 。 

这 两 个 函数 都 有 一 个 回调 参数 ,packet_handler 指向 一 个 可 以 接收 数据 包 的 函数 。 这 
个 函数 会 在 收 到 新 的 数据 包 并 收 到 一 个 通用 状态 时 被 libpcap 调用 (与 函数 pcap_loop() 和 
pcap_dispatch() 中 的 user 参数 相似 ) ,数据 包 的 首部 一 般 有 一 些 诸如 时 间 戳 和 数据 包 长 度 
的 信息 ,也 可 能 包含 协议 首部 的 数据 。 

注意 : 不 再 支持 针对 宛 余 校 验 码 CRC 的 分 析 , 因 为 帧 到 达 适 配器 ,并 经 过 校 验 确 认 以 
后 ,适配器 就 会 将 CRC 删除 ,与 此 同时 ,大 部 分 适配器 会 直接 丢弃 CRC 错误 的 数据 包 , 所 
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以 ,WinPcap 没 法 捕获 到 它们 。 
编译 ,测试 程序 8. 2 ,该 程序 将 每 一 个 数据 包 的 时 间 戳 和 长 度 从 pcap_pkthdr 的 首部 解 
析出 来 ,并 打印 在 屏幕 上 ,如 图 8. 15 所 示 。 


Ethernet Controller «Microsoft's Packet Sc 


图 8.15 程序 8.2 捕获 的 数据 包 (只 显示 时 间 戳 和 长 度 ) 


8.3.3 捕获 和 打印 所 有 数据 包 


程序 8. 3 会 依据 命令 行 参数 ,从 网 络 适 配器 或 者 文件 读 取 数 据 包 。 如 果 没 有 提供 数据 
包 源 ,那么 程序 会 显示 出 所 有 可 用 的 适配器 ,用 户 可 以 选择 其 中 一 个 。 当 捕获 过 程 开始 时 ， 
程序 会 打印 数据 包 的 时 间 戳 .长度 和 原始 内 容 

程序 8.3 捕获 和 打印 所 有 数据 包 完整 代码 

//PacketDump: 抓 包 程序 

// 请 在 预 处 理 器 定义 里 添加 WPCAP 和 HAVE. REMOTE 

# include < stdlib.h» 


* include < stdio. h> 
# include < pcap. h> 


# define LINE_LEN 16 


int main(int argc, char ** argv) 
{ 
pcap if t *alldevs, *d; 
pcap t * fp; 
u int inum, i- 0; 
char errbuf[PCAP ERRBUF SIZE]; 
int res; 
struct pcap pkthdr * header; 
const u_char * pkt. data; 
printf("pktdump: prints the packets of the network using WinPcap. Wn"); 
printf(" Usage: pktdump [ - s source] WW" 
* Examples : n" 
pktdump — s file://c:/temp/file. acp\n" 
= pktdump — s rpcap://A N Device \ V NPF _ { C8736017 — F3C3 - 4373 — 94AC — 
9A34B7DAD998) Vn") ; 
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if(argc<3) 


printf("\nNo adapter selected: printing the device list: Vn"); 
/ * 如 果 用 户 没有 提供 数据 包 源 参数 , 则 获取 本 机 网 络 设备 列表 / 
if (pcap findalldevs ex(PCAP SRC IF STRING, NULL, &alldevs, errbuf) == -1) 
t 
fprintf(stderr,"Error in pcap findalldevs ex: % s\n", errbuf); 
return -1; 
} 
/* 打印 设备 列表 */ 
for(d- alldevs; d; d = d-» next) 


í 
printf("%d. %s\n ", ++i, d-» name); 
if (d-> description) 
printf(" ( €& s)Wn", d-» description); 
else 
printf(" (No description available)Wn"); 
if (i== 0) 
{ 
fprintf(stderr, "No interfaces found! Exiting. \n"); 
return - 1; 


) 
printf("Enter the interface number (1- %d):",i); 
Scanf(" & d", &inum); 


if (inum« 1 || inum» i) 
t 
printf("WnInterface number out of range. Wn"); 


/* 释放 设备 列表 x / 
pcap freealldevs(alldevs); 
return - 1; 


) 
/* 跳 转 到 选中 的 网 络 适 配器 = / 


for (d-alldevs, i70; i< inum- 1 ;d- d-» next, i++); 


/* 打开 设备 * / 
if ( (fp = pcap_open(d 一 > name, 
100 /* 要 捕获 的 部 分 * /, 
PCAP OPENFLAG PROMISCUOUS / * 混杂 模式 /, 
20 /* 读 取 超时 时 间 x /, 
NULL / * 远程 机 器 验证 * /, 
errbuf) 
-- NULL) 
t 


fprintf(stderr, "AnError opening adapterNn" ) ; 
return - 1; 


// 打 开设 备 
if ( (fp= pcap_open(argv[2], 
100 / * 要 捕获 的 部 分 x /, 
PCAP OPENFLAG PROMISCUOUS / * 混杂 模式 x /, 
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`”. 


20 /* 读 取 超 时 时 间 * /, 
NULL /* 远程 机 器 验证 * /, 


errbuf) 
-- NULL) 
{ 
fprintf(stderr, "\nError opening source: %s\n", errbuf); 
return - 1; 
) 
) 
/* 读 取 数据 包 * / 
while((res = pcap next ex( fp, &header, &pkt data)) >= 0) 
{ 
if(res == 0) 
/* 超时 时 间 */ 
continue; 


/x* 打印 数据 包 的 时 间 惟 和 长 度 * / 
printf(" $ ld: % ld (%1d)\n", header 一 > ts. tv_sec, header —> ts.tv_usec，header 一 > len); 


/* 打印 数据 包 * / 


for (i=1; (i< header ->caplen + 1) ; i++) 


{ 
printf(" $.2x ", pkt_data[i— 1]); 
if ( (i * LINE LEN) == 0) printf("W"); 
) 
printf("\n\n"); 
} 
if(res == 一 1) 
{ 
fprintf(stderr, "Error reading the packets: % s\n", pcap_geterr(fp)); 
return -1; 
) 
return 0; 


) 

编译 ,测试 ,程序 8.3 的 运行 结果 如 图 8.16 所 示 。 刚 开始 时 ,给 出 了 程序 packetdump 
命令 的 用 法 并 显示 出 了 主机 配备 的 网 络 适配器 列表 。 因 为 只 有 一 块 网 卡 , 输 入 适配器 编号 
1, 抓 包 程序 开始 工作 。 用 户 可 以 打开 一 个 网 站 页 面 , 这 时 控制 台 上 会 显示 大 量 的 信 
在 每 一 段 信息 头 部 给 出 的 是 时 间 戳 和 捕获 的 数据 包 长 度 , 后 面 紧 随 的 是 数据 包 内 容 。 


D:\ 网 络 编程 案例 \chapter8\Sniffer\Debug\! RA 


,并 且 


F3C3-4373-94AC-9A34B7DADI98> 


图 8.16 程序 8.3 捕获 数据 包工 作 界 面 
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8.3.4 过滤 数 据 包 


程序 8. 4 演示 了 如 何 创 建 和 设置 过 滤器 ,以 及 如 何 把 捕获 的 数据 包 保 存 到 磁盘 。 
PacketFilter 不 仅 可 以 过 滤 人 处理 网 络 中 的 数据 ,还 可 以 从 已 经 保存 过 的 文件 中 提取 数据 包 。 
输入 和 输出 文件 的 格式 都 是 与 libpcap 兼容 的 格式 ,可 以 用 WinDump、TcpDump 等 网 络 协 
议 分 析 工 具 进 行 二 次 分 析 。 

PacketFilter 编译 后 的 用 法 如 下 : 


PacketFilter - s source - o output file name [ — f filter string] 


该 命令 行 有 3 个 输入 参数 : 第 1 个 参数 指定 数据 包 源 ,可 以 是 适配器 或 数据 包 文件 ; 第 
2 个 参数 指定 输出 文件 ; 第 3 个 参数 指定 过 滤器 表达 式 , 可 以 省 略 。PacketFilter 从 数据 包 
源 获取 数据 包 , 对 数据 包 进 行 过 滤 ,如 果 符 合 过 滤器 要 求 , 就 把 数据 包 保存 到 输出 文件 ,直到 
按 下 Ctrl 十 C 组 合 键 或 者 整个 文件 处 理 完毕 为 止 。 

程序 8.4 PacketFilter 数据 包 过 滤器 完整 代码 


//PacketFilter: 数 据 包 过 滤器 
include < stdlib.h» 
# include < stdio.h» 


# include < pcap. h> 


# define MAX PRINT 80 
# define MAX LINE 16 


void usage(); 


void main(int argc, char ** argv) 
( 
pcap t * fp; 
char errbuf[PCAP ERRBUF SIZE]; 
char * source - NULL; 
char * ofilename - NULL; 
char * filter = NULL; 
int i; 
pcap dumper t * dumpfile; 
struct bpf program fcode; 
bpf u int32 NetMask; 
int res; 
struct pcap pkthdr * header; 
const u char * pkt data; 
if (argc -- 1) 
t 
usage(); 
return; 
) 
for(i=1;i< argc; i+= 2) 
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switch (argv[i] [1]) 
t 
case 's': 
{ 
source=argv[i+1]; 
}; 
break; 


case 'o': 
{ 
ofilename = argv[i* 1]; 
}; 
break; 


case 'f': 
{ 
filter =argv[i+1]; 
}; 
break; 
} 
} 
// 从 网 络 打开 一 个 捕获 
if (source != NULL) 
{ 
if ( (fp= pcap_open( source, 
1514 /* 要 捕获 的 部 分 * /, 
PCAP OPENFLAG PROMISCUOUS / * 混杂 模式 * /, 
20 /* 读 取 超时 时 间 * /, 
NULL / * 远程 机 器 验证 * /, 
errbuf) 


fprintf(stderr, "AnUnable to open the adapter. Wn") ; 
return; 
| 
} 


else usage(); 


if (filter != NULL) 
©  // 为 了 找到 一 个 正确 的 
// 我 们 应 该 通过 适配器 的 pcap_findalldevs_ex() 返 回 
// 让 我 们 做 一 些 简单 的 事 : 我 们 假设 在 一 个 C 类 网 络 上 netmask = Ox££ffff; 
// 编 译 过 滤器 
if(pcap compile(fp, &fcode, filter, 1, NetMask) < 0) 
t 
fprintf(stderr, "\nError compiling filter: wrong syntax. n"); 


return; 
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// 设 置 过 滤器 

if(pcap setfilter(fp, &fcode)« 0) 

t 
fprintf(stderr, "\nError setting the filter n"); 
return; 


) 


// 打 开 转 储 文件 
if (ofilename != NULL) 
t 
dumpfile = pcap_dump_open(fp, ofilename); 


if (dumpfile == NULL) 
{ 
fprintf(stderr, "\nError opening output filein"); 
return; 
) 
) 


else usage(); 


// 开 始 捕获 
while((res = pcap next ex( fp, &header, &pkt data)) >= 0) 
{ 

if(res == 0) 

/* 超 时 时 间 * / 

continue; 


// 保 存 包 转 储 文件 
pcap dump((unsigned char * ) dumpfile, header, pkt data); 


) 


void usage() 

{ 
printf("\PacketFilter — Generic Packet Filter. Wn"); 
printf ("\nUsage:\PacketFilter — s source - o output file name [ - f filter string]\n\n"); 
exit(0); 

) 

编译 程序 8.4, 在 控制 台 窗 口 命令 行 上 输入 以 下 命令 (第 2 个 参数 用 程序 8. 1 返回 的 本 

机 网 卡 设备 标识 符 ): 


PacketFilter — s VDeviceNNPF_(A7FD048A — 5D4B — 478E — B3C1 — 34401AC3B72F} - o d:\dxz. txt 


包 过 滤器 程序 PacketFilter 开始 工作 ,用 户 此 时 可 以 用 浏览 器 上 网 ,增加 一 些 网 络 流量 ， 
然后 按 Ctrl 十 C 组 合 键 ,终止 程序 运行 。 接 着 转 到 了 D 盘 ,可 以 看 到 输出 文件 dxz. txt 已 经 创建 。 
直接 用 记事 本 将 其 打开 ,无 法 阅读 该 文件 ,但 是 用 Wireshark 打开 D 盘 下 的 dxz. txt, 则 可 以 详 
细 地 分 析 阅读 捕获 的 数据 包 情 况 , 如 图 8. 17 所 示 。 
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(SVN Rev 50926 from 
Elle Edit View Go Capture Analyze Statistics Telephony Tools Internals Help 
BEBxgQP^e»eri5asamiam 


-26.90 202. 68 


31.121163  27.194.26.90 202.102.128.68 85 standard query Oxec36 
41.121230 202.102.128.68 27.194.26.90 280 Standard query respon: 
51.121984  202.102.128.68 27.194.26.90 283 standard query respon: 
61.131730 27.194.26. 123.125.112.45 74 xingcsm > http [SYN] 
71.131902 27. 123.125.115.43 74 netrix-sftm > http [S 
8 1.149079 7 » 27.194.26.90 74 http > xingcsm [SYN, , 
9 1.153520 z 27. 90 74 http > netrix-sftm [s 

10 1.162203 27.194.26. 123.125.112.45 62 xingcsm > http [Ack] 

11 1.162358 27.194.26. 123.125. 115.43 62 netríx-sftm > http [ui 

D 


Ww Frame 1: 342 bytes on wire (2736 bits), 342 bytes captured (2736 bits) 

= Ethernet IT, sre: Giga-Byt 09:65:64 (00:24:1d:09:65:6d), Dst: Broadcast (ffiffiffiffiffifO) 
8 Internet Protocol Version 4, Sr. 0.0 0.0), Dst: 255.255.255.255 (255.255.255.255) 
4 User Datagram Protocol, Src Port: bootpc (68), Ost Port: bootps (67) 

* Bootstrap Protocol 


|@ $f User Datagram Protocol (udp), 8 bytes — Packets: 2245 - Dis. Profile: Default 


图 8.17 用 Wireshark 阅读 、 分 析 捕获 的 数据 包 文件 dxz. txt 


8.3.5 分 析 数 据 包 


程序 8.5 的 主要 目标 是 演示 如 何 解析 所 捕获 的 数据 包 的 协议 首部 。 这 个 程序 可 以 称 为 
UDPDump, 用 于 打印 一 些 网 络 上 传输 的 UDP 数据 的 信息 。 选 择 分 析 UDP 协议 而 不 是 
TCP 等 其 他 协议 ,是 因为 该 协议 比 其 他 协议 更 简单 ,作为 入 门 程序 范例 ,该 程序 是 一 个 很 不 

程序 8.5 捕获 UDP 数据 包 并 分 析 其 头 部 完整 代码 


//UDPDump. cpp 
# include "pcap. h" 


/* 4 个 字 节 的 IP 地 址 */ 
typedef struct ip address( 
u char bytel; 
u char byte2; 
u char byte3; 
u char byte4; 
)ip address; 


/* IPv4 首 部 * / 
typedef struct ip header( 


u char ver ihl; // 版 本 (4 位 ) + 首部 长 度 (4 位) 

u char tos; // 服 务 类 型 (Type of Service) 

u short tlen; // 总 长 (Total Length) 

u short identification; / / iR (Identification) 

u short flags fo; // 标 志 位 (Flags,3 位 ) + 段 偏 移 量 (Fragment Offset, 13 位 ) 
u char ttl; // 存 活 时 间 (Time to Live) 

u char proto; //BMiX (Protocol) 


u short crc; // 首 部 校 验 和 (Header Checksum) 
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ip_address saddr; // 源 地 址 (Source Address) 
ip_address daddr; // 目 的 地 址 (Destination Address) 
u int op pad; // 选 项 与 填充 (Option + Padding) 
)ip header; 
/* UDP 首部 */ 
typedef struct udp_header{ 
u short sport; // 源 端口 (Source Port) 
u short dport; // 目 的 端口 (Destination Port) 
u short len; //UDP 数据 包 长 度 (Datagram Length) 
u short crc; / / Ei à HI (Checksum) 
)udp header; 


/* 回调 函数 原型 x / 
void packet handler(u char * param, const struct pcap pkthdr * header, const u_char * pkt_ 
data); 


int main() 

{ 

pcap if t * alldevs; 

pcap if t *d; 

int inum; 

inti-0; 

pcap t * adhandle; 

char errbuf[PCAP ERRBUF SIZE]; 
u int netmask; 

char packet filter[] = "ip and udp"; 
struct bpf program fcode; 


/* 获得 设备 列表 < / 
if (pcap findalldevs ex(PCAP SRC IF STRING, NULL, &alldevs, errbuf) == 一 1) 
{ 

fprintf(stderr,"Error in pcap findalldevs: % s\n", errbuf); 

exit(1); 


) 


/x 打印 列表 * / 
for(d = alldevs; d; d = d-» next) 
{ 
printf("%d. %s", ++i, d-> name); 
if (d-> description) 
printf(" (%s)\n", d-> description); 
else 
printf(" (No description available)\n"); 


) 

if(i--0) 

{ 
printf("\nNo interfaces found! Make sure WinPcap is installed. Vn"); 
return - 1; 

) 


printf("Enter the interface number (1- &d):",i); 
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scanf(" % d", &inum); 


if(inum«1 || inum» i) 
t 
printf("\nInterface number out of range. Wn"); 
/* 释放 设备 列表 * / 
pcap freealldevs(alldevs); 
return - 1; 


Į 
/* 跳 转 到 已 选 设备 */ 


for(d-alldevs, i-0; i< inum- 1 ;d- d-» next, i++); 


/* 打开 适配器 * / 
if ( (adhandle = pcap open(d-» name, // 设 备 名 
65536, // 要 捕捉 的 数据 包 的 部 分 
//65 535 保证 能 捕获 到 不 同 数据 链 路 层 上 的 每 个 数据 包 的 全 部 内 容 
PCAP OPENFLAG PROMISCUOUS, // 混 杂 模 式 
1000, ”// 读 取 超 时 时 间 
NULL, ”// 远 程 机 器 验证 
errbuf “// 错 误 缓冲 池 
)) == NULL) 


fprintf(stderr, "\nUnable to open the adapter. % is not supported by WinPcap\n"); 
/* 释放 设备 列表 < / 

pcap freealldevs(alldevs); 

return - 1; 


} 


/* 检查 数据 链 路 层 , 为 了 简单 ,我们 只 考虑 以 太 网 * / 
if(pcap datalink(adhandle) != DLT EN10MB) 
{ 
fprintf(stderr, "\nThis program works only on Ethernet networks. Wn"); 
/* 释放 设备 列表 x / 
pcap freealldevs(alldevs); 
return - 1; 


} 


if(d-> addresses != NULL) 

/* 获得 接口 的 第 一 个 地 址 的 掩 码 x / 

netmask = ((struct sockaddr in * )(d- > addresses — > netmask)) — > sin addr.S un.S addr; 
else 

/* 如 果 接 口 没有 地 址 ,那么 我 们 假设 一 个 C 类 的 掩 码 < / 

netmask = Oxffffff; 


// 编 译 过 滤器 
if (pcap compile(adhandle, &fcode, packet filter, 1, netmask) <0 ) 
{ 
fprintf(stderr, "\nUnable to compile the packet filter. Check the syntax. n"); 
/* 释放 设备 列表 < / 
pcap freealldevs(alldevs); 
return - 1; 


) 
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// 设 置 过 滤器 
if (pcap setfilter(adhandle, &fcode)< 0) 
{ 
fprintf(stderr, "\nError setting the filter. Wn"); 
/* 释放 设备 列表 < / 
pcap freealldevs(alldevs); 
return - 1; 


) 


printf("WMnlistening on $% s...\n", d-> description); 


/* 释放 设备 列表 x / 
pcap freealldevs(alldevs); 


/* 开始 捕捉 * / 
pcap loop(adhandle, 0, packet handler, NULL); 


return 0; 


/* 回调 函数 , 当 收 到 每 一 个 数据 包 时 会 被 1ibpcap 所 调用 * / 
void packet handler(u char * param, const struct pcap pkthdr * header, const u char * pkt data) 


{ 


struct tm * ltime; 
char timestr[16]; 

ip header * ih; 

udp header * uh; 

u int ip len; 

u short sport, dport; 
time t local tv sec; 


/* 将 时 间 惟 转换 成 可 识别 的 格式 * / 

local tv sec = header -> ts. tv_sec; 

ltime- localtime(&local tv sec); 

strftime( timestr, sizeof timestr, " % H: $M: % S", ltime); 


/* 打印 数据 包 的 时 间 戳 和 长 度 < / 
printf(" % s. %.6d len:$%d"，timestr，header 一 >ts.tv_usec，header -> len); 


/* 获得 IP 数 据 包头 部 的 位 置 < / 
ih = (ip header * ) (pkt data + 
14); // 以 太 网 头 部 长 度 


/* 获得 UDP 首部 的 位 置 < / 
ip len = (ih->ver_ihl & Oxf) * 4; 
uh = (udp header * ) ((u char* )ih + ip len); 


/* 将 网 络 字 节 序 列 转换 成 主机 字 节 序列 * / 
sport = ntohs( uh 一 > sport ); 
dport = ntohs( uh—> dport ); 


/* 打印 IP 地 址 和 UDP 端口 */ 
printf(" % d. % d. % d. % d. $d -> % d. % d. % d. $d. % d\n", 
ih-» saddr.bytel, 
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ih-> saddr. byte2, 
ih—> saddr. byte3, 
ih-» saddr. byte4, 
sport, 
ih 一 > daddr.bytel, 
ih- > daddr.byte2, 
ih- > daddr. byte3, 
ih- > daddr.byte4, 
dport); 
} 
程序 8. 5 将 过 滤器 设置 成 “ip and udp”, 保 证 了 packet_handler() 只 会 收 到 基于 IPv4 的 
UDP 数据 包 , 这 将 简化 解析 过 程 。 
程序 8. 5 分 别 创建 了 用 于 描述 IP 首部 和 UDP 首部 的 结构 体 , 这 些 结构 体 中 的 各 种 数 
据 会 被 packet_handler() 合 理 地 定位 。 
packet_handler() 虽 然 只 用 于 单个 协议 的 解析 (例如 基于 IPv4 的 UDP) ,但 也 从 侧面 表 
明 嗅 探 器 (Sniffers) 类 的 程序 (例如 TcpDump 或 WinDump) 对 网 络 数据 流 进 行 解码 的 过 程 
是 很 复杂 的 。 由 于 该 程序 对 MAC 首部 不 感 兴趣 ,所 以 跳 过 它 。 为 了 简洁 ,在 开始 捕捉 前 ， 
使 用 了 pcap_datalink() 对 MAC 层 进行 检测 ,以 确保 是 在 处 理 一 个 以 太 网 ,进而 确保 MAC 
首部 是 14 位 的 。 
IP 数据 包 的 首部 位 于 MAC 首部 的 后 面 。 该 程序 从 IP 数据 包 的 首部 解析 到 源 IP 地 址 
和 目的 IP 地址 。 处 理 UDP 的 首部 有 一 些 复杂 ,因为 IP 数据 包 的 首部 的 长 度 并 不 是 固定 
而 , 仍 可 以 通过 IP 数据 包 的 length 域 来 得 到 它 的 长 度 。 一 旦 知道 了 UDP 首部 的 位 
置 ,就 能 解析 出 源 端 口 和 目的 端口 。 
编译 ,测试 程序 8. 5 ,被 解析 出 来 的 值 打印 在 屏幕 上 ,如 图 8. 18 所 示 。 


C:\WINDOWS\system32\cmd. exe 


9.0.0.68 
9.0.0.68 


图 8.18 实时 捕获 UDP 数据 包 并 分 析 其 头 部 


图 8.18 中 显示 了 捕获 并 分 析出 的 UDP 数据 包 数 据 , 依 次 为 时 间 戳 、 包 长 度 ` 源 地 址 和 
端口 号 以 及 目的 地 址 和 端口 号 。 


8.3.6 统计 网 络 流量 
程序 8. 6 用 于 监听 TCP 网 络 流量 。 统 计 引 擎 利用 内 核 数据 包 过 滤器 为 收集 到 的 数据 
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包 有 效 地 进行 分 类 。 为 了 使 用 这 个 特性 ,编程 人 员 需 要 打开 一 个 适配器 ,使 用 pcap_ 
setmode() 将 它 设 置 为 统计 模式 (Statistical Mode) ,并 使 用 MODE_STAT 作为 这 个 函数 的 
mode 参数 。 在 启动 统计 模式 之 前 ,用 户 需要 设置 一 个 过 滤器 ,以 定义 要 监听 的 数据 流 。 如 
果 不 设 置 过 滤器 ,所 有 的 数据 流量 都 会 被 统计 。 

该 程序 的 实现 流程 如 下 : 

(1) 设置 过 滤器 。 

(2) 调用 pcap_setmode()。 

(3) 回调 函数 通过 pcap_loopQ 〇 启动 。 

程序 8.6 监听 TCP 网 络 流量 完整 代码 


//NetworkTraffic.cpp: 统计 网 络 TCP 数据 包 流 量 
f include < stdlib.h» 

# include < stdio.h» 

# include < pcap. h> 


void usage() ; 

void dispatcher handler(u char * , const struct pcap pkthdr * , const u_char * ); 
void main(int argc, char ** argv) 

{ 

pcap t * fp; 

char errbuf[PCAP ERRBUF SIZE]; 

struct timeval st ts; 

u int netmask; 

struct bpf program fcode; 


/* 检查 命令 行 参数 的 合法 性 < / 
if (argc !- 2) 
{ 
usage() ; 
return; 
) 
/* 打开 输出 适配器 * / 
if ( (fp= pcap open(argv[1], 100, PCAP OPENFLAG PROMISCUOUS, 1000, NULL, errbuf) ) == 
NULL) 
{ 
fprintf(stderr, "\nUnable to open adapter %s.Vn", errbuf); 
return; 


$ 


/ * 不 用 关心 掩 码 , 在 这 个 过 滤器 中 它 不 会 被 使 用 * / 

netmask = Oxffffff; 

// 编 译 过 滤器 

if (pcap compile(fp, &fcode, "tcp", 1, netmask) «0 ) 

{ 
fprintf(stderr, "\nUnable to compile the packet filter. Check the syntax. Mn"); 
/* 释放 设备 列表 < / 
return; 


) 


// 设 置 过 滤器 
if (pcap setfilter(fp, &fcode)« 0) 
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fprintf(stderr, "\nError setting the filter. \n"); 
pcap_close(fp); 

/* 释放 设备 列表 * / 

return; 


) 


/* 将 接口 设置 为 统计 模式 < / 
if (pcap setmode(fp, MODE STAT)« 0) 
t 
fprintf(stderr, "\nError setting the mode. n"); 
pcap close(fp); 
/* 释放 设备 列表 x / 
return; 


} 


printf("TCP traffic summary: Wn"); 
/* 开始 主 循环 * / 
pcap loop(fp, 0, dispatcher handler, (PUCHAR)&st ts); 


pcap close(fp); 
return; 


) 


void dispatcher handler(u char * state, const struct pcap pkthdr * header, const u char * pkt 
data) 
{ 

struct timeval * old ts = (struct timeval * )state; 

u int delay; 

LARGE INTEGER Bps, Pps; 

struct tm * ltime; 

char tinestr[16]; 

time t local tv sec; 


/* 以 毫秒 计算 上 一 次 采样 的 延迟 时 间 * / 

/* 这 个 值 通过 采样 得 到 的 时 间 戳 获得 > / 

delay = (header ->ts.tv_sec — old ts 一 >tv_sec) * 1000000 — old ts- tv usec + header 
— > ts. tv_usec; 

/* 获取 每 秒 的 比特 数 * / 

Bps. QuadPart = ( ( ( * (LONGLONG * )(pkt data + 8)) * 8 * 1000000) / (delay)); 

// 将 字 节 转换 成 比特 , 延 时 是 以 毫秒 表示 的 

// 得 到 每 秒 的 数据 包 数 量 

Pps.QuadPart = ((( * (LONGLONG * )(pkt data)) * 1000000) / (delay)); 


/ 将 时 间 惟 转化 为 可 识别 的 格式 * / 

local tv sec = header -> ts.tv sec; 

ltime- localtime(&local tv sec); 

strftime( timestr, sizeof timestr, " % H: &M: & S", ltime); 


/* JEDER < / 


printf(" %s ", timestr); 


/* 打印 采样 结果 * / 
printf("BPS- % I64u ", Bps.QuadPart); 
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printf("PPS- % I64uVn", Pps. QuadPart); 


// 存 储 当前 的 时 间 惟 
old ts 一 > tv_sec = header — > ts. tv_sec; 
old_ts -> tv_usec = header — > ts. tv_usec; 


) 


void usage() 
( 
printf("\nShows the TCP traffic load, in bits per second and packets per second. \nCopyright 
(C) 2002 Loris Degioanni. Wn"); 
printf("\nUsage:\n"); 
printf("\t NetworkTraffic adapter\n"); 
printf("\t You can use V'WinDump - DV" if you don't know the name of your adapters. Wn"); 
exit(0); 


) 

在 程序 8. 6 中 ,适配器 打开 后 的 超时 时 间 设 置 为 1000 毫秒 ,这 就 意味 着 dispatcher | 
handler() 每 隔 1 秒 就 会 被 调用 一 次 。 这 里 的 过 滤器 被 设置 为 只 监视 TCP 包 。 

程序 8. 6 比 一 般 的 捕获 和 统计 流量 的 程序 都 要 高 效 ,因为 它 使 用 最 少 的 数据 包 复 制 流 
程 ,CPU 的 性 能 会 最 优 ,内 存 的 需求 量 也 会 很 少 。 

运行 ,测试 这 个 程序 需要 在 命令 行 中 输入 以 下 命令 : 

NetworkTraffic \Device\NPF_{A7FD048A — 5D4B — 478E — B3C1 — 34401AC3B72F} 


后 面 的 参数 为 本 机 网 卡 设备 标识 符 , 可 用 程序 8. 1 获取 。 


E 


. WinPcap 适合 开发 哪些 类 型 的 应 用 ? 不 适合 开发 哪些 类 型 的 应 用 ? 为 什么 ? 

. 简 述 WinPcap 的 系统 结构 。 

. 简 述 NPF 的 工作 模型 和 工作 机 制 。 

. NPF fil TCP/IP 有 什么 关系 ? 

简 述 WinPcap 开发 环境 的 配置 方法 。 

.基于 WinPcap 不 仅 可 以 抓 取 数 据 包 ,而 且 可 以 向 网 络 上 发 送 数据 包 , 查 阅 WinPcap 
技术 文档 ,编写 一 个 向 网 络 发 送 原始 数据 包 的 小 程序 。 

7. 本 章程 序 8. 1 一 程序 8. 5 给 出 了 抓 包 和 协议 头 分 析 例 程 ,整合 这 些 功 能 ,查阅 
WinPcap 技术 文档 并 参考 Wireshark 的 功能 实现 特点 ,编写 一 个 基于 窗 体 界面 的 网 络 嗅 探 
程序 ,重点 实现 各 种 协议 的 分 析 功 能 。 

8. 根据 程序 8.6 监听 TCP 网 络 流量 原理 ,编写 一 个 基于 窗 体 界面 的 网 络 流量 监控 和 
计 费 程序 。 


oO m = t rn = 


网 络 五 子 棋 | 


五 子 棋 是 深 受 广大 读者 喜爱 的 益 智 类 小 游戏 ,在 许多 网 络 游戏 平台 上 都 有 成 熟 的 应 用 。 
五 子 棋 游戏 的 通信 设计 有 两 条 技术 路 线 , 一 条 是 WinSock API, 一 条 是 MFC 套 接 字 技 术 。 
如 果 要 实现 互联 网 上 的 大 型 多 人 在 线 模 式 , 则 基于 WinSock API, 使 用 完成 端口 /O 模型 
是 最 好 的 选择 。 本 章 的 网 络 五 子 棋 系 统 参 考 网 络 上 流行 的 MFC 五 子 棋 游 戏 设 计 源码 , 基 
于 MFC CAsyncSocket 套 接 字模 型 (封装 了 WSAAsyncSelect L/O 模型 ) ,从 项 目 实战 角度 
给 出 了 概要 设计 和 详细 设计 。 设 计 过 程 主要 分 为 两 个 阶段 ,首先 完成 人 机 对 战 模式 的 设计 ， 
然后 在 此 基础 上 借助 MFC 套 接 字 通 信 技 术 完 成 网 络 对 战 模式 的 设计 。 


6.1 五 子 棋 简介 


本 节 是 关于 五 子 棋 的 一 些 入 门 知识 和 计算 机 博弈 算法 的 介绍 ,目的 是 帮助 读者 较 准确 
地 认识 五 子 棋 的 术语 及 行 棋 规则 ,为 理解 和 掌握 五 子 棋 的 算法 设计 做 准备 。 


9.1.1 棋盘 和 棋子 


1. 棋盘 js 
棋盘 由 纵 、 横 各 15 条 等 距离 ,垂直 交叉 的 平行 线 1 
构成 ,形成 225 个 交叉 点 。 1% T M 


棋盘 上 的 纵 行 线 从 下 到 上 用 阿拉 伯 数 字 1—15 标 10 

记 , 横 行 线 从 左 到 右 用 英文 字母 AO 标记 。 其 中 , Hs 
点 为 天 元 ,D、 DLL 点 为 星 。 天 元 和 星 在 棋盘 上 6 
用 实心 小 圆 点 标 出 ,天 元 和 星 在 棋盘 上 起 标识 位 置 的 | 
3 


作用 ,如 图 9.1 所 示 。 


2. 棋子 1 
ABCDEFGHIJKLMNO 

棋子 分 黑白 两 色 。 图 9. 1 棋盘 结构 布局 

9.1.2 五 子 棋 术 语 

1. 一 着 


在 对 局 过 程 中 , 行 棋 方 把 棋子 落 在 棋盘 无 子 的 交叉 点 上 , 称 为 一 着 。 
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2. 阳线 
阳线 指 棋盘 上 可 见 的 横 、 纵 直线 ,如 图 9.2 所 示 。 
3. 阴线 


阴线 指 棋盘 上 无 实 线 连 接 的 AO. 和 Ais 一 O, 两 条 隐形 斜 线 , 以 及 与 这 两 条 斜 线 平 
行 的 由 交叉 点 连接 形成 的 其 他 隐形 斜 线 ,如 图 9. 2 所 示 。 


4. 活 三 
活 三 指 本 方 再 走 一 着 可 以 形成 活 四 的 三 ,如 图 9.3 所 示 。 
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7 4 7 
6 B^ | 6H 
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ABCDEFGHIJKLMNO 
图 9.2 阴线 和 阳线 图 9.3 活 三 


5. 活 四 


活 四 指 有 两 个 点 可 以 成 五 的 四 ,如 图 9.4 所 示 。 
6. 冲 四 


冲 四 指 只 有 一 个 点 可 以 成 五 的 四 ,如 图 9. 5 所 示 ,图 中 的 A 点 为 成 五 点 。 
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图 9.4 活 四 图 9.5 冲 四 


ABCDEFGHIJKLMNO 
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7. 五 连 


五 连 指 在 棋盘 的 阳线 和 阴线 的 任意 一 条 线 上 ,形成 的 5 个 同色 棋子 不 间隔 的 相连 ,如 
图 9.6 所 示 。 


8. 长 连 


长 连 指 在 棋盘 的 阳线 和 阴线 的 任意 一 条 线 上 ,形成 的 5 个 以 上 同色 棋子 不 间隔 的 相连 ， 
如 图 9.7 所 示 。 


15 15 
14 14 S 
13 e 13 P 
12 + + 2 + + 
11 ¿° ii ° 
10 e 10 e 
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8 * 8 * 
7 7 
6 | 6 
5 5 [| 
[tete] Hee 
3 3 
2 | 2 
INBCDEFGHIJKLMNO lABCDEFGHIJKLMNO 
图 9.6 mx 图 9.7 长 连 
9. 回合 
双方 各 走 一 着 , 称 为 一 个 回合 。 
10. 黑 方 
黑 方 是 执 黑 棋 一 方 的 简称 。 
11. B5 
白 方 是 执 白 棋 一 方 的 简称 。 
12. 终局 
终局 指 对 局 结束 。 


(1) 胜局 : 有 一 方 获胜 的 对 局 。 
(2) 和 局 : 分 不 出 胜 负 的 对 局 。 


13. 复 盘 

复 盘 是 对 局 双方 将 本 盘 对 局 全 过 程 的 再 现 。 

14. 自由 开局 

自由 开局 指 对 局 开始 后 由 双方 轮流 行 棋 ,不 作 禁 手 等 限制 。 
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15. #F 


禁 手 是 对 局 中 如 果 使 用 将 被 判 负 的 行 棋 手段 。 

(1) 三 三 禁 手 : 黑 棋 一 子 落下 同时 形成 两 个 或 两 个 以 上 的 活 三 ,此 子 必 须 为 两 个 活 三 
共同 的 构成 子 , 如 图 9. 8 所 示 ,该 图 中 的 X 点 为 禁 手 点 。 

(2) 四 四 禁 手 : 黑 棋 一 子 落下 同时 形成 两 个 或 两 个 以 上 的 冲 四 或 活 四 ,如 图 9. 9 所 示 ， 
该 图 中 的 XX 点 为 禁 手 点 。 


ABCDEFGHIJKLMNO ABCDEFGHIJKLMNO 
图 9.8 三 三 禁 手 图 9.9 四 四 禁 手 
(3) 长 连 禁 手 : 黑 棋 一 子 落下 形成 一 个 或 一 个 以 上 的 长 连 。 
16. REH 
轮 走 方 指 当前 应 该 行 棋 的 一 方 。 
17. 非 轮 走 方 
非 轮 走 方 指 当 前 不 该 行 棋 的 一 方 。 


9.1.3 TRI 


1. 下 法 

对 局 双方 各 执 一 色 棋 子 , 黑 先 、 白 后 交替 下 子 , 每 次 只 能 下 一 子 。 棋 子 下 在 棋盘 的 交叉 
点 上 ,棋子 下 定 后 ,不 得 向 其 他 点 移动 ,不 得 从 棋盘 上 拿 起 另 落 别 处 。 

2. 落 子 


棋子 应 直接 落 于 棋盘 的 空白 交叉 点 上 。 
3. 执 黑 先 行 
每 局 棋 先 手 者 均 执 黑 先行 。 
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4. 对 局 记录 


比赛 中 双方 棋 手 做 对 局 记录 。 记 录 方 法 如 下 : 

双方 棋 手 在 对 局 中 要 在 规定 的 记录 纸 上 清晰 、 准 确 、 完 整 . 及 时 地 用 代数 记录 法 逐一 记 
录 双 方 的 行 棋 着 法 。 黑 棋 用 奇数 画 圈 记录 ,如 @ O9. O9. 0. Q9---- 白 棋 用 偶数 记录 ,如 2. 
4、6、8、10…… 一 般 要 求 在 已 方 走 下 一 着 之 前 记 完 前 一 回合 双方 的 着 法 ,不 得 提前 记录 己方 
或 对 方 的 着 法 。 


5. 计时 


(1) 比赛 时 限 : 比赛 时 限 可 分 为 包干 制 和 加 秒 制 两 种 。 

(2) 在 一 些 比赛 中 ,也 可 采用 对 局 双方 共用 时 限 ,可 分 为 1 小 时 到 10 小 时 不 等 。 

(3) 在 包干 制 时 限 比 赛 中 ,又 可 分 为 单一 时 限 和 多 重 时 限 两 种 方法 。 

CD 单一 时 限 : 指 比赛 中 每 方 只 给 定 一 个 时 限 ,在 该 时 限 内 必须 完成 全 部 比赛 。 如 未 完 
成 , 则 率先 用 完 比 赛 时 限 的 选手 判 负 。 

@ 多 重 时 限 : 指 比 赛 中 每 方 依次 给 定 多 个 时 限 ,每 个 时 限 结束 时 如 比赛 尚未 结束 则 进 
人 下 一 个 时 限 ,也 可 规定 在 每 个 时 限 需 完成 一 定 的 着 法 。 采 用 每 个 时 限 完成 一 着 的 情况 又 
称 读 秒 。 如 未 完成 在 时 限 内 规定 的 着 法 或 在 最 后 一 个 时 限 到 达 时 比赛 未 结束 , 则 先 用 完 最 
后 一 个 比赛 时 限 的 选手 判 负 。 

在 读 秒 时 间 内 , 若 比赛 棋 手 离 席 , 裁 判 应 按 规 定 继续 读 秒 计 时 ,超时 判 负 。 

(4) 加 秒 制 时 限 : 比赛 双方 每 方 拥有 一 个 固定 的 起 始 用 时 ,之 后 每 走 一 着 棋 加 相应 时 
间 , 如 果 在 用 时 范围 内 没有 结束 比赛 , 则 先 到 达 时 限 的 选手 判 负 。 

(5) 比赛 计时 : 比赛 一 开始 ,应 立即 开动 黑 方 棋 钟 ,在 对 局 过 程 中 ,应 在 每 方 行 棋 后 按 
停 已 方 棋 钟 ,开动 对 方 棋 钟 。 


6. 终局 


双方 确认 的 终局 或 由 计算 机 判定 的 终局 均 为 终局 。 终 局 分 胜局 与 和 局 。 
1) 胜局 

CD 计算 机 判断 出 最 先 在 棋盘 上 形成 五 连 的 一 方 为 胜 。 长 连 视 同 五 连 。 
(2) 超过 规定 时 限 者 。 

G) 一 方 宣布 认输 者 。 

2) 和 局 

对 局 中 出 现下 列 情况 之 一 , 判 和 棋 。 

(1) 对 局 双方 一 致 同意 和 棋 。 

(2) 全 盘 均 下 满 ,已 无 空白 交叉 点 , 且 无 胜局 出 现 。 

3) 提 和 

COD 欲 提 和 者 应 在 自己 刚 下 完 一 着 后 提出 。 

(2) 一 方 提 和 ,对 方 可 对 提 和 建议 表示 同意 ,也 可 拒绝 。 


9.1.4 五 子 棋 的 人 机 博弈 
计算 机 五 子 棋 对 弈 是 一 种 完备 信息 博弈 (Games of Perfect Information) ,意思 是 指 参 
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与 双方 在 任何 时 候 都 完全 清楚 每 一 个 棋子 是 否 存 在 ,位 于 何 处 。 大 家 只 要 看 看 棋盘 ,就 能 够 
一 清二 楚 。 象 棋 、 围 棋 等 都 属于 完备 信息 博弈 。 要 想 实 现 人 和 计算 机 双方 对 弈 ,不 妨 假设 人 
是 甲 方 ,计算 机 是 乙方 ,人 和 计算 机 对 弈 的 过 程 可 以 表述 如 下 : 

假设 首先 由 甲 方 走 棋 , 甲 方面 对 的 是 一 个 开始 局 面 1, 从 局 面 1 可 以 有 M 种 符合 规则 的 
下 法 。 

这 M 种 下 法 分 别 形 成 了 局 面 2、3、…、M 十 1, 如 图 9. 10 所 示 。 

假设 甲 选择 了 形成 局 面 2 的 下 法 , 轮 到 乙 下 棋 。 乙 面 对 局 面 2, 又 可 以 有 N 种 可 能 的 下 
法 ,形成 N 种 新 的 局 面 , 即 & 十 1 十 2、…… 十 N, 如 图 9.11 所 示 。 


甲 面 对 局 面 1 乙 面 对 局 面 2 
2 3 aa MH | rm | 2 ~ kN 
图 9.10 甲 方面 对 的 局 势 图 9.11 乙方 面 对 的 局 势 


如 果 甲 选择 形成 局 面 &+1、A 十 2、…\ 十 N 中 的 任 一 种 下 法 ,乙方 都 对 应 有 若干 种 下 
法 。 这 样 甲 、 乙 双方 轮流 下 棋 , 棋 盘 局 面 发 生变 化 就 形成 了 如 图 9. 12 所 示 的 一 棵 树 的 形状 ， 
通常 称 为 博弈 树 。 


m 
Z:2 Z:3 
甲 :4 UNE T.6 T. 7 
= D Z: 0 [z: v] [z: v] [z: 15 z4 pu 


图 9.12 博弈 树 的 例子 


博弈 树 最 终 的 叶 结 点 有 甲 赢 乙 输 、 甲 输 乙 赢 、 甲 和 乙 平 手 3 种 。 下 棋 者 总 是 从 当前 局 面 
出 发 选择 最 有 利于 自己 的 走 法 下 一 子 , 如 甲 在 局 面 1, 他 将 从 乙 2、 乙 3 等 局 面 中 选择 最 有 利 
于 自己 的 走 法 ; 同样 , 乙 在 局 面 2 时 也 从 甲 4、 甲 5 等 局 面 中 选择 最 有 利于 自己 的 走 法 。 为 
了 从 很 多 局 面 中 选 出 最 优 的 ,需要 一 个 搜索 算法 和 一 个 对 局 面 进 行 形势 判断 的 函数 。 搜 索 
算法 通常 使 用 极 大 / 极 小 值 算法 、Alpha-Beta 剪 枝 技 术 , 对 形势 好 坏 的 判断 ,用 估 值 函数 进 
行 评价 。 


9.1.5 如 何 判断 胜 负 o 


五 子 棋 的 胜 负 , 在 于 判断 棋盘 上 是 否 存在 一 个 点 ,从 
这 个 点 开始 的 右 `\ 下 \ 右 下 \ 左 下 4 个 方向 有 连续 的 5 个 同 sk ko uy 
色 棋子 出 现 , 即 形成 五 连 ,如 图 9.13 所 示 。 P | ES 
后 面 定 义 的 棋盘 类 CTable 的 Win 成 员 函 数 的 算法 设 
计 , 即 是 根据 图 9. 13 的 原则 ,用 4 个 循环 在 4 个 方向 判断 图 9.13 五 连 的 方向 
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NA 
行 棋 的 菜 一 方 是 否 取胜 。 


// 判 断 指定 颜色 是 否 胜利 
BOOL CTable::Win( int color ) const 
{ 

int x, y; 

// 判 断 横向 

for ( y = 0; y «15; y**) 

{ 


for(x = 0; x <11; x++) 


i 
if (color == m data[x][y] && color == m data[x + 1][y] && 


color == m data[x + 2][y] && color == m data[x + 3][y] && 
color == m data[x + 4][y] ) 


return TRUE; 


) 
} 
// 判 断 纵向 
for ( y = 0; y<11; Y++) 
{ 


for ( x = 0;x<15; x**) 


{ 
if (color == m data[x][y] && color == m data[x][y + 1] && 


color == m data[x][y + 2] && color == m data[x][y + 3] && 
color == m data[x][y + 4]) 


return TRUE; 


) 
) 
// 判 断 “\" 方 向 
for ( y = 0; y<11; y**) 
{ 
for (x = 0; x <11; x++) 
í 
if (color == m data[x][y] && color == m data[x + 1][y + 1] && 
color == m data[x + 2][y + 2] && color == m data[x + 3][y + 3] 


S&color == m data[x + 4][y + 4] ) 
return TRUE; 


) 
} 
// 判 断 “/" 方 向 
for ( y = 0; y «11; y+) 
{ 
for ( x = 4; x <15; x**) 


{ 
if (color == m data[x][y] && color == m data[x - 1][y + 1] && 
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color == m data[x - 2][y + 2] &&color == m data[x - 3][y + 3] 
&&color == m data[x - 4][y + 4] ) 


return TRUE; 
) 


I 
// 不 满足 胜利 条 件 
return FALSE; 

) 


值得 注意 的 是 ,Win 函数 遵循 的 判断 顺序 是 从 左 到 右 、 自 上 而 下 ,对 于 横向 和 纵向 ,都 
有 一 些 靠近 边界 的 坐标 点 不 用 考虑 。 例 如 ,判断 横向 五 连 , 横 坐标 的 循环 上 界定 为 11,12 以 
下 不 用 考虑 。 

通过 这 种 判断 胜 负 的 算法 ,用 户 也 可 以 看 出 五 子 棋 的 获胜 组 合共 有 15X11Xx2 十 11 x 
11x2—572 种 。 


6.2 人 机 对 战 系统 设计 


从 项 目 设计 角度 来 看 ,人 机 对 战 是 网 络 对 战 的 基础 。 本 节 完 成 的 游戏 基 类 、 棋 盘 类 和 消 
息 结 构 等 都 可 以 用 在 后 面 的 网 络 对 战 设计 中 。 


9.2.1 功能 需求 


五 子 棋 人 机 对 战 的 主要 目的 是 让 计算 机 陪 人 下 棋 ,该 程序 应 该 具有 的 基本 功能 如 下 : 

A) 程序 的 运行 界面 提供 标准 结构 的 15X15 棋盘 , 黑 、 白 棋子 由 程序 绘制 。 

(2) 程序 允许 玩家 先 走 或 计算 机 先 走 ,计算 机 落 子 由 程序 控制 ,玩家 单 击 棋盘 上 的 交叉 
点 ,程序 根据 单 击 位 置 确定 落 子 点 。 双 方 轮流 行 棋 ,自由 开局 。 

(3) 胜 负 或 和 棋 完 全 交 由 程序 判断 。 

(4) 为 了 复 盘 学 习 研究 ,可 以 保存 双方 的 所 有 对 弈 步骤 。 为 了 简化 程序 的 设计 ,本 节 的 
人 机 对 战 系统 暂时 不 考虑 这 项 功能 。 

(5) 设 定 一 个 悔 棋 功 能 ,为 了 降低 悔 棋 迎 辑 的 复杂 度 , 人 机 对 战 暂 定 不 允许 悔 棋 , 在 实 
现 后 面 的 网 络 对 战 时 一 并 考虑 。 

人 机 对 战 的 初始 运行 界面 如 图 9. 14 所 示 。 


9.2.2 创建 项 目 程序 框架 


人 机 对 战 系统 的 项 目 总 框架 的 创建 步骤 如 下 : 

CD 启动 VS2010, 选 择 “ 文 件 一 新 建 "命令 ,弹出 “新 建 项 目 ” 对 话 框 ,将 项 目 模板 选择 为 
MFC, 项 目 类 型 选择 为 “MFC 应 用 程序 ”, 项 目 名 称 设 定 为 Five, 并 设 定 一 个 保存 位 置 ,然后 
单 击 “ 确 定 ” 按 钮 ,进入 MFC 应 用 程序 向 导 。 

(2) 在 MFC 应 用 程序 向 导 中 ,设置 应 用 程序 类 型 为 “基于 对 话 框 ”, 将 对 话 框 标题 设置 
为 五子棋”, 并 选择 “Windows 套 接 字 ” 复 选 框 (为 支持 网 络 对 战 通信 做 准备 ) ,其 他 选项 保 
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图 9. 14 人 机 对 战 的 初始 运行 界面 


留 默 认 设置 ,然后 单 击 “ 完 成 ”按钮 ,完成 程序 主 框架 的 创建 。 此 时 生成 了 两 个 类 , 即 
CFiveApp( 存 放 于 文件 Five. h, Five. cpp 中 )、CFiveDlg (存放 于 文件 FiveDlg. h, FiveDlg. 
cpp 中 )。 项 目 结构 如 图 9. 15 所 示 。 
如 果 此 时 编译 、 运 行程 序 , 运 行 界面 如 图 9. 16 所 示 , 即 它 还 只 是 一 个 空白 框架 。 
RSEN - x == 
alala - 
3 
8. 周 | 
由 dà 外 部 依赖 项 
s mx 


i Five. h 
国 FiveDlg.h 


“Five ”(1 个 


M Resource. h 

国 stdafx. h 

国 targetver.h 
= GRE 

€ Five. cpp 

€J FiveDlg. cpp 

€J stdafx. cpp 
* RRL 
E Reade. txt 


图 9.15 人 机 对 战 程序 的 初始 框架 图 9.16 项 目 框架 的 初始 运行 界面 
接 下 来 ,逐步 为 这 个 框架 完善 各 组 成 模块 的 设计 。 


9.2.8 导入 资源 文件 


人 机 对 战 程序 涉及 的 主要 界面 元 素 有 棋盘 、 黑 棋子 、 白 棋子 ,它们 用 3 个 位 图 表示 。 为 
了 让 落 子 有 声 , 玩 家 赢得 比赛 . 输 掉 比赛 都 有 音乐 伴奏 ,需要 导入 3 个 声音 文件 。 并 且 , 在 下 
棋 双 方 的 姓名 之 间 加 入 一 个 PK 图 标 文件 。 各 文件 的 名 称 和 作用 如 表 9. 1 所 示 。 
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表 9.1 五 子 棋 程序 导入 的 资源 文件 

文件 名 作 用 资源 ID 
Table. bmp 棋盘 位 图 大 小 : 480X509 IDB_BMP_TABLE 
Black. bmp 黑子 大 小 : 24X24 IDB BMP BLACK 
White. bmp 白 子 大 小 : 24 X24 IDB BMP WHITE 
PK. ico PK 图 标 大 小 : 48X48 IDI ICON PK 
put. wav 落 子 声 音 IDR WAVE PUT 
win. wav 获胜 音乐 IDR WAVE WIN 
lost. wav 输 棋 音乐 IDR_WAVE_LOST 


R 9. 1 中 文件 的 导入 方法 很 简单 ,首先 将 上 述 素 材 文件 
复制 到 Five 项 目的 res 文件 夹 中 ,然后 在 图 9. 15 所 示 的 解决 
方案 资源 管理 器 中 右 击 项 目 名 称 Five, 在 快捷 菜单 中 选择 * 添 
加 一 资源 ”命令 ,然后 借助 向 导 将 资源 文件 分 别 导入 ,并 根据 
表 9.1 设 定 资源 的 ID 标识 。 完 成 后 的 项 目 资源 视图 如 图 9. 17 


所 示 o 


9.2.4 主 菜单 设计 


在 图 9. 17 所 示 的 资源 视图 中 右 击 资源 文件 名 Five. rc. 
在 快捷 菜单 中 选择 “添加 资源 ”命令 ,然后 按照 向 导 提 示 创 建 


资源 视图 - Five z4x 
= EB 
m CBFive.rc 
SCA "WAVE" 
B IDR WAVE LOST 
Ë IDR WAVE PUT 
Ë IDR WAVE WIN 
SB Bitmap 


S IDB DNP BLACK 
d IDB DNP TABLE 
S IDB BNP WHITE 
s Ga Dialog 
国 IDD ABOUTBOX 
国 ID FIVE DIALOG 
& Ga Icon 
if IDI ICON PK 
i) IDR MAINFRANE 
* CI String Table 
$ Cà Version 


图 9.17 Five 项 目 资源 视图 


主 菜 单 。 菜 单 的 各 项 功能 定义 见 表 9.2, 考 虑 到 后 面 网 络 对 战 
的 需要 ,这 里 将 网 络 对 战 的 菜单 项 也 一 并 定义 ,但 暂 不 实现 其 相关 功能 。 


表 9.2 五 子 棋 的 菜单 项 定义 


主 菜单 菜单 项 菜单 ID 功 能 
开始 人 机 对 战 | 玩家 先行 (&P) ID MENU PlayerFirst 由 玩家 执 黑 先 走 棋 
(&S) 计算 机 先行 (&C) | ID_MENU_PCFirst 由 计算 机 执 黑 先 走 棋 
发 起 游戏 ( 先 手 方 ) 发 起 游戏 的 玩家 执 黑 先 走 棋 , 在 网 络 
ID_ME ERVE. 
T D-MENUSERVER | 通信 中 扮演 服务 器 的 角色 
开始 网 络 对 战 | 加 入 游戏 (后 手 方 ) 加 入 别人 的 邀请 , 执 白 后 走 棋 ,在 网 
(END QA... ID-MENU-CHENT | 络 通信 中 扮演 客户 机 的 角色 
再 战 一 局 (&M) ID_MENU_PLAYAGAIN | 重新 开局 
离开 游戏 (&Q) ID MENU_LEAVE 关闭 通信 模式 
设置 玩家 姓名 
选项 (&O) N)... DENUN eno 
胜 负 统计 (&T)..。 |ID MENU STAT 显示 胜 负 率 
关于 (&A) 关于 五 子 棋 .… ID MENU ABOUT 关于 程序 信息 


9.2.5 人 机 对 战 项 目 类 图 
在 完成 上 述 基 本 程序 框架 的 基础 上 ,再 为 人 机 对 战 游戏 定义 3 个 类 和 两 个 结构 体 。 
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(D CTable 类 : 下 棋 使 用 的 道具 是 棋盘 ,所 有 的 下 棋 行 为 都 与 棋盘 相关 ,因此 定义 一 个 
棋盘 类 CTable, 描 述 棋盘 、 棋 子 、 玩 家、 计算 机 四 者 相互 作用 构成 的 整个 游戏 空间 。 

(2) CGame 类 : 定义 一 个 抽象 类 CGame 来 表达 游戏 的 后 台 逻 辑 , 定 义 游戏 的 基本 行 
为 ,例如 告诉 对 方 、 已 方 的 落 子 信息 ,判断 胜 负 等 。 

(3) COneGame 类 : 考虑 到 人 机 对 战 和 网 络 对 战 是 两 种 不 同 的 模式 ,交战 双方 的 信息 
交流 有 很 大 的 不 同 , 但 二 者 又 有 许多 共性 ,因此 ,由 CGame 类 再 分 别 派生 出 COneGame 和 
CTwoGame 两 个 子 类 ,分 别 代表 人 机 对 战 类 和 网 络 对 战 类 。 关 于 网 络 对 战 类 的 设计 , 放 到 
9. 3 节 实 现 。 

COD 消息 结构 体 MSGSTRUCT: 下 棋 又 称 * 手 谈 ”", 人 机 对 战 ,其 实 也 是 人 机 对 话 , 玩 家 
需要 把 自己 的 行 棋 位 置 告 诉 计算 机 一 方 ,计算 机 也 要 告诉 玩家 一 方 说 ,“ 嗨 ,我 下 好 了 ,下 在 
这 个 位 置 , 该 你 走 棋 了 ”。 为 了 描述 人 机 之 间 的 这 个 信息 交流 ,在 程序 中 需要 定义 一 个 表达 
消息 的 结构 体 , 这 个 结构 体 最 好 在 后 面 的 网 络 对 战 中 也 能 使 用 ,因为 网 络 对 战 看 起 来 更 需要 
依赖 消息 传递 。 

(5) 落 子 结构 体 STEP: 人 机 对 战 或 网 络 对 战 与 生活 中 人 类 面对面 对 弈 的 过 程 不 同 , 计 
算 机 上 的 落 子 是 由 绘图 程序 完成 的 。 绘 图 程序 来 维护 棋盘 上 的 动态 变化 , 落 子 时 只 需 告 i 
计算 机 程序 的 落 子 位 置 和 棋子 颜色 即 可 ,因此 定义 一 个 结构 体 STEP, STEP 实际 上 是 
MSGSTRUCT 的 简化 版 本 。 

结合 前 面 已 创建 的 项 目 框架 和 自动 生成 的 程序 类 ,整个 项 目的 类 图 关系 如 图 9. 18 所 示 。 


COneGame| 1 
(4| CFiveApp (4| COneGame strep |? STEP 
'OneGame 
日 特性 日 特性 1 r| 日 特性 STEP 
日 操作 日 操作 日 操作 1 
CFiveApp Ç )1 STEP 个 1 
CFiveDlg 1 
[R] CFiveDlg CGame|A| CGame CGame 
l 
= 特性 = 特性 CONG 
日 操作 n| E st i 
1 
CFiveDlg 1 1 
CTable | 1 i MSGSTRUCT 1 
= CTable | = = MSGSTRUCT 
/&| CTable 1 [A] CTwoGame [A] MSGSTRUCT < J 
! 1 
1 1 
四 特性 k- |E tt 日 特性 
日 操作 日 操作 日 操作 
CTable| 1 Craplel 1 — 1 


图 9.18 项 目 总 体 类 图 设计 
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CFiveApp 类 定义 于 Five. h 和 Five. cpp 文件 ,不 需要 改动 ,在 此 不 再 著述 。 下 面 按照 
项 目的 创建 逮 辑 和 实现 步骤 ,对 其 他 类 的 设计 实现 过 程 分 别 进行 介绍 。 


9.2.6 消息 结构 体 设 计 


在 项 目 名 称 Five 上 右 击 , 在 快捷 菜单 中 选择 * 添 加 一 新 建 项 ”命令 ,然后 选择 文件 类 型 
“ 头 文件 (.h)”, 输 入 文件 名 Message. h, 单 击 “ 添 加 ”按钮 完成 文件 的 创建 。 
为 了 表示 每 一 手 棋 所 下 的 位 置 及 代表 的 行 棋 方 ,定义 tagStep 结构 如 下 : 
typedef struct tagStep ( // 定 义 一 手 棋 的 数据 结构 
int x; 
int y; 
int color; 
) STEP; 
网 络 对 战 时 , 行 棋 的 双方 需要 告知 对 方 自 己 的 行 棋 位 置 , 有 时 还 要 向 对 方 表 达 一 些 消 
息 ,为 此 ,定义 消息 结构 tagMsgStruct 如 下 : 
typedef struct tagMsgStruct { 
// 消 息 ID 
UINT uMsg; 
// 落 子 信息 
int x; 
int y; 
int color; 
// 消 息 内 容 
TCHAR szMsg[ 128]; 
) MSGSTRUCT; 
STEP fil MSGSTRUCT 这 两 种 结构 体 类 型 ,被 CTable ,CGame, COneGame 和 CTwoGame 


的 成 员 变 量 或 成 员 函 数 所 使 用 。 
9.2.7 人 机 对 战 逻 辑 模 型 


人 机 对 战 的 双方 , 即 玩家 和 计算 机 ,其 交战 过 程 也 是 一 个 对 话 过 程 ,对 话 的 主要 逻辑 顺 
序 分 为 两 种 情况 。 

第 1 种 : 玩家 先 走 一 侦 听 鼠标 左 键 弹 起 事件 一 条 件 具 备 , 落 子 ,判断 玩家 是 否 获胜 。 若 
获胜 , 则 置 等 待 标志 为 TRUE, 本 局 结束 ; 否则 ,发 送 落 子 信 息 STEP 给 计算 机 一 计算 机 寻 
找 最 佳 落 子 位 置 一 向 棋盘 发 送 消息 MSG_DROPDOWN 并 报告 落 子 位 置 -棋盘 处 理 来 自 
计算 机 的 MSG_DROPDOWN 消息 , 落 子 ; 判断 计算 机 是 否 胜利 , 若 胜利 , 则 结束 本 棋局 , 否 
则 轮 到 玩家 行 棋 …… 

第 2 种: 计算 机 先 走 一 让 计算 机 在 天 元 处 落 子 一 侦 听 鼠标 左 键 弹 起 事件 一 条 件 具 备 ， 
落 子 ,判断 玩家 是 否 获胜 。 若 获胜 , 则 置 等 待 标志 为 TRUE ,本 局 结束 ; 否则 ,发送 落 子 信息 
STEP 给 计算 机 一 计算 机 寻找 最 佳 落 子 位 置 一 向 棋盘 发 送 消息 MSG_DROPDOWN 并 报告 
落 子 位 置 一 棋盘 处 理 来 自 计算 机 的 MSG_DROPDOWN 消息 , 落 子 ; 判断 计算 机 是 否 胜利 ， 
若 胜利 , 则 结束 本 棋局 ,否则 轮 到 玩家 行 模 …… 

综合 以 上 两 种 情况 ,人 机 对 话 的 基本 模型 如 图 9. 19 所 示 。 
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侦 听 鼠标 左 键 弹 起 事件 ， 落 子 ， 判 断 玩家 是 否 
获胜 ， 不 获胜 发 送 落 子 消息 STEP 给 计算 机 


|” 寻 技 最 佳 沙子 位 置 ， 向 棋盘 【玩家 ) 
发 送 消息 MSG_DROPDOWN 报 告 落 子 位 置 ， 


机 是 否 获 胜 ， 不 获胜 则 等 待 玩家 行 棋 … 
图 9.19 人 机 对 话 模型 


9.2.8 游戏 基 类 CGame 的 设计 


1. CGame 类 的 UML 定义 


CGame 是 一 个 抽象 类 ,由 它 可 以 进一步 派生 出 人 机 对 战 游戏 类 COneGame 和 网 络 对 
战 游戏 类 CTwoGame。 图 9. 20 所 示 为 CGame 类 的 UML 类 图 定义 。 


日 特性 
+ m StepList : list<STEP> 
# m pTable : CTable 


操作 


+ << virtual>> "CGame() 

+ <<abstract>> Init() 

+ <<abstract>> ReceiveMsg(pMsg : MSGSTRUCT *) 
十 <<abstract>> SendStep(stepSend : const STEP&) 

+ ««virtual»» Win(stepSend : const STEP&) 

+ ««virtual»» Back() 

+ CGame(pTable : CTable *) 


棋盘 处 理 MSG_DROPDOWN 消 息 ， 落 子 ; 判断 计算 


计算 机 


图 9.20 CGame 的 UML 类 图 


2. 创建 CGame 类 的 程序 框架 


在 项 目 名 称 Five 上 右 击 ,在 快捷 菜单 中 选择 “添加 一 类 ”命令 ,然后 选择 MEC 类 进入 
MFC 添加 类 向 导 , 将 类 名 设置 为 CGame, 基 类 选择 CObject, 头 文件 和 程序 文件 分 别 选 择 
Game. h 和 Game. cpp; 单 击 “ 完 成 ”按钮 ,CGame 类 的 框架 创建 完成 。 


3. 添加 CGame 类 的 源码 


打开 Game. h 文件 ,添加 程序 9. 1 给 出 的 CGame 类 定义 ,并 保存 文件 。 
程序 9.1 游戏 基 类 CGame 的 定义 


// 定 义 游戏 基 类 CGame 


# pragma once 
#include < list> 


# include "Message. h" // 消 息 类 定义 文件 


class CTable; 
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class CGame : public CObject 

š 

protected: 
CTable * m_pTable; 

public: 
// 落 子 步骤 
std: :list < STEP > m StepList; 

public: 
// 构 造 函 数 
CGame( CTable * pTable ) : m pTable( pTable )( ); 
// 析 构 函 数 
virtual —CGame() ; 
// 初 始 化 工作 ,不 同 的 游戏 方式 初始 化 也 不 一 样 
virtual void Init() = 0; 
// 处 理 胜利 后 的 情况 , CTwoGame 需要 改写 此 函数 完成 善后 工作 
virtual void Win( const STEP& stepSend ) ; 


// 发 送 已 方 落 子 

virtual void SendStep( const STEP& stepSend ) = 0; 
// 接 收 对 方 消息 

virtual void ReceiveMsg( MSGSTRUCT * pMsg ) = 0; 
// 发 送 悔 棋 请求 


virtual void Back() = 0; 
u 
打开 Game. cpp 文件 ,添加 CGame 类 的 实现 代码 ,完成 后 保存 文件 。 
/ / CGane 类 的 实现 部 分 


CGame: :一 CGame(){ ) 
void CGame: :Win( const STEP& stepSend )( ) 


9.2.9 人 机 对 战 类 COneGame 的 设计 
1. COneGame 类 的 UML 定义 


人 机 对 战 类 COneGame 派生 自 CGame 类 ,其 UML 定义 如 图 9. 21 所 示 。 相 比 其 父 类 
CGame, 它 增加 了 若干 成 员 变量 和 成 员 函 数 。 

对 于 每 一 个 落 子 坐标 ,获胜 的 组 合 一 共有 15X11X2 十 11X11X2=572 种 。 

对 于 每 个 坐标 的 获胜 组 合 , 应 该 设置 一 个 L[15][L15]L572] 大 小 的 三 维 数组 。 

在 拥有 了 这 些 获 胜 组 合 之 后 ,就 可 以 参照 每 个 坐标 的 572 种 组 合 给 自己 的 局 面 和 玩家 
的 局 面 进行 打分 了 ,也 就 是 根据 当前 盘面 中 某 一 方 所 拥有 的 获胜 组 合 多 少 进行 权 值 的 估算 ， 
给 出 最 有 利于 自己 的 一 步 落 子 坐 标 。 

由 于 是 双方 对 弈 ,所 以 游戏 的 双方 都 需要 一 份 获胜 组 合 ,也 就 是 : 

bool m Computer[15][15][572]; // 计 算 机 获胜 组 合 


bool m Player[15][15][572]; // 玩 家 获胜 组 合 
在 每 次 初始 化 (COneGame: :Init) 游 戏 的 时 候 , 需 要 将 每 个 坐标 下 可 能 的 获胜 组 合 都 置 
为 TRUE。 


此 外 ,还 需要 记录 计算 机 和 玩家 在 各 个 获胜 组 合 中 所 填 人 的 棋子 数 : 
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int m_Win[2][572]; 


在 初始 化 的 时 候 ,将 每 个 胜局 的 棋子 数 置 为 0。 


* 


5 COneGame 


日 特性 
—m bOldComputer : bool[572] 
—m bOldPlayer : bool[572] 
— m bStart : bool 
—m Computer : bool[15][15][572] 
—m nOldWin : int[2][572] 
—m Player : bool[15][15][572] 
—m step: STEP. 
—m Win : int[2][572] 
已 操作 
+ << virtual>> "COneGame() 
+ <<virtual>> Init() 
+ <<virtual>> Win(stepSend : const STEP&) 
+ <<virtual>> Back() 
+ <<virtual>> ReceiveMsg(pMsg : MSGSTRUCT *) 
+ <<virtual>> SendStep(stepSend : const STEP&) 
+ COneGame(pTable : CTable *) 
- GetTable(tempTable : int[][15], nowTable : int[][15]) 
- GiveScore(stepPut : const STEP&) : int 
- SearchBlank(i : int &, j : int &, nowTable : int[J[15]) : bool 


图 9. 21 COneGame 的 UML 类 图 


2. 实现 COneGame 类 的 设计 


打开 Game. h 文件 ,添加 程序 9. 2 所 示 的 人 机 对 战 类 COneGame 的 定义 ,并 保存 文件 。 
程序 9.2 人 机 对 战 类 COneGame 的 定义 


class COneGame : public CGame 

{ 
bool m Computer[15][15][572]; // 计 算 机 获胜 组 合 
boolm Player[15][15][572]; ”// 玩 家 获胜 组 合 


int m Win[2][572]; // 各 个 获胜 组 合 中 填 入 的 棋子 数 
bool m bStart; // 游 戏 是 否 刚刚 开始 

STEP n step; // 保 存 落 子 结果 

// 以 下 3 个 成 员 做 悔 棋 之 用 


bool m bOldPlayer[572]; 
bool m bOldConputer[572]; 
int m nOldWin[2][572]; 
public: 
COneGame( CTable * pTable ) : CGame( pTable ) {} 
virtual — COneGame( ) ; 
virtual void Init(); 
virtual void SendStep( const STEP& stepSend ); 
virtual void ReceiveMsg( MSGSTRUCT * pMsg ); 
virtual void Back(); 
private: 
// 给 出 下 了 一 个 子 后 的 分 数 
int GiveScore( const STEP& stepPut ); 
void GetTable( int tempTable[][15], int nowTable[][15] ); 
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bool SearchBlank( int &i, int &j, int nowTable[][15] ); 
}; 


打开 Game. cpp 文件 ,添加 程序 9. 3 所 示 的 COneGame 类 的 实现 代码 ,并 保存 文件 。 
程序 9.3 人 机 对 战 类 COneGame 的 实现 


HIM I P P gn g MAI P P P P P ] gl 
/ /COneGane 类 的 实现 部 分 
HIM P P P P P P P HH P PPP P 9 ng 
COneGame: : — COneGane( ) 
{ 1} 
void COneGame: :Init() // 初 始 化 游戏 
{ 
// 设 置 对 手 姓名 
m_pTable — > GetParent() -> SetDlgItemText( IDC_ST_ENEMY，_T(" 计 算 机 ") ); 
// 初 始 化 获胜 组 合 数 组 
int i, j, k, nCount = 0; 
for ( i = 0; i<15; i++) 
t 
for ( j = 0; j<15; j++) 
{ 
for ( k = 0; k < 572; k++) 
{ 
m Player[i][j][k] = false; 
m Computer[i][j][k] = false; 


) 
) 
for ( i = 0; i<2; i++) 
{ 
for ( j = 0; j< 572; j++) 
{ 
m_Win[i][j] = 0; 
} 
} 
for ( i = 0; i< 15; i++) 
{ 
for ( J = 0; J <11; j**) 


{ 
for (k= 0; k«5; k++) 
{ 
m Player[j + k][i][nCount] = true; 
m Computer[j + k][i][nCount] = true; 
) 
nCount++ ; 


) 
} 
for(i-0;i«15; i++) 
{ 
for ( j = 0; j«11; j+) 
{ 
for (k= 0; k«5; k++) 
{ 
m Player[i][j + k][nCount] = true; 
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m_Computer[i][j + k][nCount] = true; 


) 
nCount++ ; 
) 
) 
for ( i = 0; 1<1 i++) 
{ 
fæ (J= 0; 43 <1l; j**) 
i for ( k = 0; k«5; k++) 
{ 
m Player[j + k][i + k][nCount] = true; 
m Computer[j + k][i + k][nCount] = true; 
) 
nCount++ ; 
) 
} 


for (i w-0; 3.2 Ll Pes) 
( 
for ( j = 14; j>= 4; j-- ) 
( 
for ( k = 0; k«5; k++) 
t 
m Player[j - k][i + k][nCount] = true; 
m Computer[j - k][i + k][nCount] = true; 
) 
nCount++ ; 
) 
} 
if (1 == m pTable-»GetColor() ) // 计 算 机 先 走 
{ 
// 让 计算 机 占据 天 元 
m_pTable -> SetData( 7, 7, 0 ); 
PlaySound( MAKEINTRESOURCE( IDR WAVE PUT ), NULL, SND RESOURCE | SND SYNC ); 
m bStart - false; 
for ( i = 0; i<572; i++) 
{ 
// 保 存 先前 数据 ,做 悔 棋 之 用 
m nOldWin[O][i] = m Win[O][i]; 
m nOldWin[1][i] = m Win[1][i]; 
m bOldPlayer[i] = m Player[7][7][i]; 
) 
for ( i = 0;i1«572; i++) 
{ 
// 修 改 计算 机 下 子 后 棋盘 的 变化 状况 
if ( m Computer[7][7][i] && m Win[1][i] := -1) 
t 
m Win[1][i]**; 
) 
if ( m_Player[7][7][i] ) 
t 
m Player[7][7][i] = false; 
m Win[O][i] = -1; 
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} 
} 
else 

m bStart = true; 
Į 


void COneGame: :SendStep( const STEP& stepPut ) 


{ 


int bestx, besty, i, j, pi, pj, ptemp, ctemp, pscore = 10, cscore = - 10000; 
int ctempTable[15][15], ptempTable[15][15]; 
int m, n, temp1[20], temp2[20]; // 暂 存 第 一 步 搜索 的 信息 


m_pTable - > GetParent() 一 > GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
// 保 存 先前 数据 ,做 悔 棋 之 用 
for ( i = 0;i<572; i++) 
{ 
m nOldWin[0][i] = m Win[0][i]; 
m nOldWin[1][i] = m Win[1][i]; 
m bOldPlayer[i] = m Player[stepPut. x][stepPut. y][i]; 
m bOldComputer[i] = m Computer[stepPut.x][stepPut. y][i]; 
) 
// 修 改 玩家 下 子 后 棋盘 状态 的 变化 
for ( i = 0; i<572; i++) 
{ 
// 修 改 状态 变化 
if ( m Player[stepPut.x][stepPut. y][ i] && m Win[0][i] != -1) 
m Win[0][i]e*; 
if ( m Computer[stepPut. x][ stepPut. y][i] ) 
t 
m Computer[stepPut.x][stepPut.y][i] = false; 
m Win[1][i] = -1; 
) 
) 
if ( m_bStart ) 
{ 
// 手 动 确定 第 一 步 : 天 元 或 (8， 8) 
if( -1 == m pTable-»m data[7][7] ) 


t 
bestx - 7; 
besty = 7; 
i 
else 
t 
bestx - 8; 
besty = 8; 


} 
m bStart = false; 
} 


else 


{ 
STEP step; 


// 寻 找 最 佳 位 置 
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GetTable( ctempTable, m pTable-»m data ); 
while ( SearchBlank( i, j, ctempTable ) ) 
t 
n = 0; 
pscore = 10; 
GetTable( ptempTable, m pTable — > m_data ); 
ctenpTable[i][j] = 2; // 标 记 已 被 查找 
step.color = 1 - m_pTable 一 > GetColor(); 
step.x = i; 
step.y 7 j; 
// 给 这 个 空位 打分 
ctemp = GiveScore( step ); 
for ( m = 0; n«572; m++) 
€ 
// 暂 时 更 改 玩家 信息 
if ( m Player[i][j][m] ) 
{ 
templ[n] = m; 
m Player[i][j][m] = false; 
temp2[n] = m Win[0][m]; 
m Win[0][m] = -1; 
n++; 
) 
) 
ptempTable[i][j] = 0; 


pi = i; 

pj = j; 

while ( SearchBlank( i, j, ptempTable ) ) 
{ 


ptempTable[ i][j] = 2; // 标 记 已 被 查找 

step. color = m_pTable -> GetColor(); 

step.x i; 

step.y = j; 

ptemp = GiveScore( step ); 

if ( pscore> ptemp ) — // 此 时 为 玩家 下 子 , 运 用 极 小 / 极 大 法 时 应 选取 最 小 值 


pscore = ptemp; 


} 
for ( m = 0; m< n; m++) 
{ 
// 恢 复 玩 家 信息 
m_Player[pi][pj][templ[m]] = true; 
m_Win[0][templ[m]] = temp2[m]; 
) 
if ( ctemp + pscore > cscore ) // 此 时 为 计算 机 下 子 ,运用 极 小 / 极 大 法 时 应 选 
// 取 最 大 值 
{ 
cscore = ctemp + pscore; 
bestx = pi; 
besty - pj; 


j 
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m step.color = 1 - m pTable-» GetColor(); 
m step.x - bestx; 
m step.y - besty; 
for(i-0;i«572; i**) 
t 
// 修 改 计算 机 下 子 后 棋盘 的 变化 状况 
if ( m Computer[bestx][besty][i] && m Win[1][i] != -1) 
m Win[1][i]**; 
if ( m Player[bestx][besty][i] ) 
f 
m_Player[bestx][besty][i] = false; 
m Win[0O][i] = -1; 
} 
} 
m pTable — > GetParent() 一 > GetDlgItem( IDC BTN BACK ) -> EnableWindow(); 
// 由 于 是 单 人 游戏 ,所 以 直接 接收 数据 
m pTable- > Receive(); 


void COneGame::ReceiveMsg( MSGSTRUCT * pMsg ) 


( 


) 


pMsg--» color = m step.color; 
pMsg-2x = m step.x; 
pMsg-»y = m step.y; 

pMsg -> uMsg = MSG DROPDOWN; 


void COneGame: : Back( ) 


( 


int i; 
// 单 人 游戏 允许 直接 悔 棋 
STEP step; 
// 悔 第 一 步 ( 计 算 机 落 子 ) 
step = *( m StepList.begin() ); 
m StepList.pop front(); 
m pTable-»m data[step.x][step.y] = -1; 
// 恢 复原 有 胜 负 布 局 
for(i-0;i44572; i++) 
{ 
m Win[0][i] = m nOldWin[O][i]; 
m Win[1][i] = m noldWin[1][i]; 
m Player[step.x][step.y][i] = m bOldPlayer[i]; 


" 


) 

// 悔 第 二 步 (玩家 落 子 ) 

step = *( m StepList.begin() ); 
m StepList.pop front(); 


m pTable-»m data[step.x][step.y] = -1; 
// 恢 复原 有 胜 负 布 局 
for ( i = 0; i<572; i++) 
{ 
m_Computer[ step.x][step.Y][i] = m bOldComputer[i]; 
) 


m_pTable -> Invalidate(); 
// 考 虑 到 程序 的 负荷 ,这 时 候 就 不 允许 悔 棋 了 
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AfxGetMainWnd() 一 > GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
} 
int COneGame: :GiveScore( const STEP& stepPut ) 
t 
int i, nScore - 0; 
for(i-0;i«572; i++) 
f 
if ( m_pTable 一 > GetColor() == stepPut.color ) 
{ 
// 玩 家 下 
if ( m Player[stepPut. x][stepPut. y][i] ) 
{ 
Switch ( m Win[0][i] ) 
{ 
case 1: 
nScore -= 5; 
break; 
case 2: 
nScore -= 50; 
break; 
case 3: 
nScore -= 500; 
break; 
case 4: 
nScore -= 5000; 
break; 
default: 
break; 


) 
else 
{ 
// 计 算 机 下 
if ( m_Computer[ stepPut. x][stepPut. y][i] ) 
{ 
switch ( m Win[1][i] ) 
{ 
case 1: 
nScore += 5; 
break; 
case 2: 
nScore += 50; 
break; 
case 3: 
nScore += 100; 
break; 
case 4: 
nScore += 10000; 
break; 
default: 
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break; 
) 
) 
) 
) 
return nScore; 
) 
void COneGame::GetTable( int tempTable[][15], int nowTable[][15] ) 
{ 
int i, j; 
for ( i = 0; i<15; i) 
t 
for (j= 0; j <15; j++) 
{ 
tempTable[i][j] = nowTable[i][j]; 
) 
) 
) 


bool COneGame::SearchBlank( int &i, int &j, int nowTable[][15] ) 
{ 
int x, y; 
for ( x = 0; x «15; x**) 
{ 
for ( y = 0;y<15; y++) 


{ 
if ( nowTable[x][y] == -1 && nowTable[x][y] != 2 ) 
{ 
i = x; 
4 = y: 


return true; 


) 
) 


return false; 


) 


9.2.10 棋盘 类 CTable 的 设计 
1. CTable 类 的 UML 定义 


CTable 类 定义 下 棋 双 方 围绕 棋盘 所 进行 的 各 种 活动 和 发 生 的 事件 ,其 UML 定义 如 
图 9.22 所 示 。 


2. 创建 CTable 类 的 程序 框架 


在 项 目 名 称 Five 上 右 击 , 在 快捷 菜单 中 选择 “添加 一 新 建 项 "命令 ,然后 选择 “ 头 文件 
(.h)”, 设 置 文件 名 为 Table.h。 接 着 用 类 似 的 步骤 创建 Table. cpp 文件 , 则 CTable 类 的 框 
架 创 建 完 成 。 

打开 Table.h 文件 ,创建 程序 9.4 所 示 的 CTable 类 的 定义 并 保存 文件 。 
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CTable 


特性 

* m bOldWait : BOOL 

+m data : int[15][15] 

* m strAgainst : CString 

* m strMe : CString 

— Draw( x:int, y:int, color : int) 

—m bWait : BOOL 

—m color : int 

—m iml : ClmageList 

-m pGame : CGame * 

操作 

+ <<const>>GetColor() : int 

+ ««const»? Win(color : int): BOOL 
* Accept(nGameMode : int) 

* Back() 

* Clear(bWait : BOOL) 

+ CTable() 

* OnLButtonUp(nFlags : UINT, point : CPoint) 
+ OnPaint() 

* Receive() 

+ RestoreWait() 

* SetColor(color : int) 

+ SetData(x : int, y : int, color : int) 
+ SetGameMode(nGameMode : int) 
* SetWait(bWait : BOOL) : BOOL 
* StepOver() 

7 CTable() 


图 9.22 CTable 的 UML 类 图 


程序 9.4 人 机 对 战 类 CTable 的 定义 


//CTable 类 定义 
# pragma once 
# include "Game. h" 
class CTable : public CWnd 
{ 
CImageList m iml; 
int m color; 
BOOL m bWait; 


// 棋 子 图 像 
// 玩 家 颜色 
// 等 待 标志 


void Draw(int x, int y, int color); 


CGame * m pGame; 
public: 


// 游 戏 基 类 指针 


void SetMenuState( BOOL bEnable ); 


void RestoreWait(); 
BOOL m bOldWait; 
CString m strMe; 
CString m strAgainst; 
int m data[15][15]; 
CTable(); 

—CTable(); 

void Clear( BOOL bWait 


// 先 前 的 等 待 标志 
// 玩 家 名 字 
// 对 方 名 字 
// 棋 盘 数 据 


); 


void SetColor( int color); 


int GetColor() const; 


BOOL SetWait( BOOL bWait ); 
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void SetData( int x, int y, int color ); 
BOOL Win( int color) const; 

void SetGameMode( int nGameMode ); 
void Back(); 

void StepOver(); 

void Accept( int nGameMode ); 

void Receive(); 


protected: 


}; 


afx msg void OnPaint(); 
afx msg void OnLButtonUp( UINT nFlags, CPoint point ); 
DECLARE MESSAGE MAP() 


打开 Table. cpp 文件 ,创建 程序 9. 5 所 示 的 CTable 类 的 实现 并 保存 文件 。 
程序 9.5 人 机 对 战 类 CTable 的 实现 


# include "stdafx. h" 
# include "Five. h" 

# include "Table. h" 

# include "Message. h" 
# include "Resource. h" 


// 构 造 函数 ,初始 化 棋盘 数据 以 及 图 像 数据 
CTable: :CTable() 


{ 


) 


// 初 始 化 玩家 姓名 

TCHAR str[10]; 

CFiveApp * pApp = (CFiveApp * )AfxGetApp(); 
::GetPrivateProfileString( T("Options"), T("Name"), _T(" 玩 家 "), str, 15, pApp ->m szIni); 
m strMe - str; 

// 初 始 化 图 像 列 表 

m iml.Create( 24, 24, ILC COLOR24 | ILC MASK, 0, 2); 
// 载 人 黑白 棋子 掩 码 位 图 

CBitmap bmpBlack, bmpWhite; 

bmpBlack.LoadBitmap( IDB BMP BLACK ); 

m iml.Add( &bmpBlack, OxffOOff ); 
bmpWhite.LoadBitmap( IDB BMP WHITE ); 

m iml.Add( &bmpWhite, OxffOOff ); 

// 初 始 化 游戏 模式 

m pGame = NULL; 


// 析 构 函 数 ,释放 m_pGame 指针 
CTable: :~CTable() 


{ 


// 写 人 玩家 姓名 

CFiveApp * pApp = (CFiveApp * )AfxGetApp(); 
::WritePrivateProfileString( T("Options"), 
// 写 人 战绩 统计 

TCHAR str[10]; 

wsprintf( str, T("&d"), phpp-»m nWin); 
::iWritePrivateProfileString( T("Stats"), T("Win"), str, pApp- m szIni ); 
wsprintf( str, _T(" % d"), pApp-»m nDraw ); 

::WritePrivateProfileString( T("Stats"), T("Draw"), str, pApp—>m szIni ); 


T("Nane"), m strMe, pApp-»m szIni ); 
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wsprintf( str, _T(" $d"), pApp—>m nLost ); 
::WritePrivateProfileString( T("Stats"), T("Lost"), str, pApp-» m szIni ); 
if ( NULL !- m pGame ) 
delete m pGame; 
) 


// 在 指定 棋盘 坐标 处 绘制 指定 颜色 的 棋子 
void CTable::Draw( int x, int y, int color ) 
t 
POINT pt; 
pt.x254* 25 * x; 
pt.y » 101 * 25 * y; 
CDC *pDC = GetDC(); 
CPen pen; 
pen.CreatePen( PS SOLID, 1, Oxff ); 
pDC- > SelectObject( &pen ); 
pDC-» SetROP2( R2 NOTXORPEN ) ; 
m iml.Draw( pDC, color, pt, ILD TRANSPARENT ); 
STEP step; 
// 利 用 R2. NOTXORPEN 擦 除 先 前 画 出 的 矩形 
if ( !m_pGame - » m StepList.empty() ) 
{ 
// 获 取 最 后 一 个 点 
step = *( m pGame-» m StepList.begin() ); 


pDC-»MoveTo( 54 + 25 * step.x, 101 + 25 * step.y ); 
pDC-»LineTo( 79 + 25 * step.x, 101 + 25 * step.y); 
pDC-» LineTo( 79 + 25 * step.x, 126 + 25 * step.y ); 
pDC-»LineTo( 54 + 25 * step.x, 126 + 25 * step.y); 
pDC-» LineTo( 54 + 25 * step.x, 101 + 25 * step.y ); 


) 

// 更 新 最 后 落 子 的 坐标 数据 , 画 出 新 的 矩形 

step.color = color; 

step.x 7 x; 

step.y - y; 

m pGame- >m_ StepList.push front( step ); 

pDC-»MoveTo( 54 + 25 * step.x, 101+ 25 * step.y); 
pDC- > LineTo( 79 25 * step.x, 101 + 25 * step.y); 
pDC — > LineTo( 79 25 * step.x, 126 + 25 * step.y ); 
pDC — > LineTo( 54 25 * step.x, 126 + 25 * step.y); 
pDC- > LineTo( 54 25 * step.x, 101 + 25 * step.y ); 
ReleaseDC( pDC ) ; 


" 
+ 
+ 
+ 


) 


// 清 空 棋盘 
void CTable: :Clear( BOOL bWait ) 
{ 
int x, y; 
for ( y = 0; y «15; y+) 
{ 
for ( x = 0; x€15; x**) 
t 
m_data[x][y] = -1; 
) 
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// 设 置 等 待 标志 
m bWait = bWait; 
Invalidate(); 
// 删 除 游戏 
if ( m pGame != NULL ) 
t 

delete m pGame; 

m pGame - NULL; 


) 


// 设 置 玩家 颜色 
void CTable: :SetColor( int color ) 
{ 

m color = color; 


f 


// 获 取 玩家 颜色 
int CTable: :GetColor() const 
{ 

return m color; 


j 


// 设 置 等 待 标志 ,返回 先前 的 等 待 标志 
BOOL CTable::SetWait( BOOL bWait ) 
( 
m bOldWait - m bWait; 
m bWait - bWait; 
return m bOldWait; 
) 


// 设 置 棋盘 数据 ,并 绘制 棋子 
void CTable::SetData( int x, int y, int color ) 
{ 

m data[x][y] = color; 

Draw( x, y, color ); 


) 


// 判 断 指定 颜色 是 否 胜利 
BOOL CTable::Win( int color ) const 
{ 
int x, y; 
// 判 断 横向 
for ( y = 0; y «15; y**) 
t 
for ( x = 0; x<11; z+) 
t 
if (color == m data[x][y] && color == m data[x + 1][y] && 
color -- m data[x * 2][y] &&color -- m data[x * 3][y] && 
color == m data[x + 4][y] ) 


return TRUE; 
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) 
// 判 断 纵向 
for ( y = 0; y<11; y+) 
( 
for ( x = 0; x «15; x++) 
{ 
if (color -- m data[x][y] && color == m data[x][y + 1] && 
color m data[x][y * 2] &&color -- m data[x][y * 3] && 
color == m data[x][y + 4]) 


return TRUE; 


) 
} 
// 判 断 “\” 方 向 
for ( y = 0; y«11; y+) 
t 

for ( x = 0; x< 11; x+) 

t 

if (color == m data[x][y] && color == m data[x + 1][y + 1] && 
color == m data[x + 2][y + 2] && color == m data[x + 3][y + 3] && 


color -- m data[x * 4][y * 4]) 
return TRUE; 


) 
) 
// 判 断 “/” 方 向 
for ( y = 0; y<11; ye*) 
{ 


for (x= 4;x<15; x**) 


{ 
if (color == m data[x][y] && color == m data[x - 1][y + 1] && 
color == m data[x - 2][y + 2] && color == m data[x - 3][y + 3] && 
color == m data[x - 4][y * 4]) 
t 
return TRUE; 
) 
) 
) 
// 不 满足 胜利 条 件 
return FALSE; 


) 


// 设 置 游戏 模式 ,网 络 对 战 将 共用 此 函数 
void CTable::SetGameMode( int nGameMode ) 
( 
m pGame = new COneGame( this ); 
m pGane -> Init(); 
) 


// 悔 棋 
void CTable: :Back() 


( 
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m pGame- > Back() ; 
) 


// 处 理 计 算 机 落 子 后 的 工作 
void CTable: :StepOver() 
{ 
// 判 断 计 算 机 是 否 胜利 
if (Win( 1 - m color ) ) 
t 
CFiveApp * pApp = (CFiveApp * )AfxGetApp(); 
pApp-»m nLoste*; 
CDialog * pDlg = (CDialog * )GetParent(); 
PlaySound( MAKEINTRESOURCE( IDR WAVE LOST ), NULL, SND RESOURCE | SND SYNC ); 
pDlg-»MessageBox( _T(" 您 输 了 ,不 过 不 要 灰心 ,失败 乃 成 功 之 母 哦 :")，_T(" 失 败 "),MB_ 
ICONINFORMATION ); 
pDlg-»GetDlgItem( IDC BTN BACK ) — > EnableWindow( FALSE ); 
return; 
) 
m bWait - FALSE; 
) 


// 接 受 连接 ,网 络 对 战 将 共用 此 函数 
void CTable: :Accept( int nGameMode ) 
{ 
SetColor( 0 ); 
Clear( FALSE ); 
SetGameMode( nGameMode ); 
) 


// 接 收 来 自 对 方 的 数据 ,网 络 对 战 将 对 此 函数 进行 扩展 ,以 处 理 更 多 的 消息 
void CTable: :Receive() 
{ 
MSGSTRUCT nsgRecv; 
m_pGame 一 > ReceiveMsg( &msgRecv ); 
// 对 各 种 消息 分 别 进行 处 理 
switch ( msgRecv. uMsg ) 
{ 
case MSG PUTSTEP: 
t 
PlaySound( MAKEINTRESOURCE( IDR WAVE PUT ), NULL, SND RESOURCE | SND SYNC ); 
SetData( msgRecv.x, msgRecv. y, msgRecv. color ); 
// 大 于 一 步 才能 悔 棋 
GetParent() — > GetDlgItem( IDC BTN BACK ) - > EnableWindow( m pGame- > m. 
StepList.size()»1); 
StepOver(); 
} 
break; 
// 网 络 对 战 将 在 此 处 处 理 网 络 消息 
} 
} 
// 消 息 映射 表 
BEGIN MESSAGE MAP( CTable, Ciind ) 
//((AFX MSG MAP(CTable) 
ON WM PAINT() 
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ON_WM_LBUTTONUP( ) 
//}}AFX_MSG MAP 
END MESSAGE MAP() 


// 处 理 WM. PAINT 消息 

void CTable: :OnPaint() 

{ 

CPaintDC dc( this ); 

// 装 载 棋盘 
CBitmap bmp; 
CPen pen; 
bmp.LoadBitmap(IDB BMP TABLE); 


CDC dcMen; 
dcMem. CreateCompatibleDC( &dc ); 


pen.CreatePen( PS SOLID, 1, Oxff ); 
dcMem. SelectObject( &bmp ); 
dcMem. SelectObject( &pen ); 
dcMem. SetROP2( R2 NOTXORPEN ) ; 
// 根 据 棋盘 数据 绘制 棋子 
int x, y; 
POINT pt; 
for ( y = 0; y< 15; y++) 
{ 
for(x = 0; x <15; xe*) 
{ 
if ( -1!= m data[x][y] ) 
t 
pt.x = 54 + 25 * x; 
pt.y = 101 + 25 * y; 
m iml.Draw( &dcMem, m data[x][y], pt, ILD TRANSPARENT ); 


) 
) 
// 绘 制 最 后 落 子 的 指示 拢 形 
if ( NULL != m pGame && !m_pGame 一 > m StepList.empty() ) 
{ 
STEP step = *( m pGame- » m StepList.begin() ); 


dcMem.MoveTo( 54 + 25 * step.x, 101 + 25 * step.y); 
dcMem.LineTo( 79 * 25 * step.x, 101 * 25 * step.y); 
dcMem.LineTo( 79 * 25 * step.x, 126 * 25 * step.y); 
dcMem.LineTo( 54 + 25 * step.x, 126 + 25 * step.y); 
dcMem.LineTo( 54 + 25 * step.x, 101 + 25 * step.y); 


) 
// 完 成 绘制 
dc.BitBlt( 0, 0, 480, 509, &dcMem, 0, 0,SRCCOPY); 
dcMem. SelectObject(bmp); 
) 


// 处 理 左 键 弹 起 消息 ,为 玩家 落 子 之 用 
void CTable: :OnLButtonUp( UINT nFlags, CPoint point ) 
{ 

STEP stepPut; 
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if ( m bWait ) 
{ 
MessageBeep( MB OK ); 
return; 
) 
int x, y; 
x = (point.x - 54) / 25; 
y = ( point.y - 101) / 25; 
// 如 果 在 (0, 0) 一 (14，14) 范 围 内 , 且 该 坐标 没有 落 子 , 则 落 子 于 此 ,否则 发 出 警告 并 退出 过 程 
if (x<0||x>14||y<0 || y>14 || m_data[x][y] '* -1) 
{ 
MessageBeep( MB_OK ); 
return; 
j 
else 
{ 
// 如 果 位 置 合法 , 则 落 子 
SetData( x, y, m color ); 
stepPut.color - m color; 
stepPut.x - x; 
stepPut.y = y; 
// 大 于 一 步 才能 悔 棋 
GetParent() — > GetDlgItem( IDC BTN BACK ) -> EnableWindow( m pGame — > m StepList. 
size() >1 ); 
} 
// 判 断 胜利 的 情况 
if ( Win( m color) ) 
{ 
CFiveApp * pApp = (CFiveApp * )AfxGetApp(); 
PApp—>m nWin**; 
m_pGame 一 > Win( stepPut ); 
CDialog * pDlg = (CDialog * )GetParent(); 
PlaySound( MAKEINTRESOURCE( IDR WAVE WIN ), NULL, SND SYNC | SND RESOURCE ); 
pDlg-»MessageBox( _T(" 恭 喜 ,您 获得 了 胜利 !")，_T(" 胜 利 ")，MB_ICONINFORMRTION ); 


pDlg-» GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ) 


m bWait = TRUE; 
return; 


else 


// 开 始 等 待 

m bWait = TRUE; 

// 发 送 落 子 信息 

PlaySound( MAKEINTRESOURCE( IDR WAVE PUT ), NULL, SND SYNC | SND RESOURCE ); 
m pGame - > SendStep( stepPut ); 


) 


// 重 新 设置 先前 的 等 待 标志 
void CTable: :RestoreWait() 
{ 

SetWait( m bOldWait ); 
) 
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在 CTable 类 中 使 用 了 PlaySound 播放 声音 函数 ,需要 在 系统 包含 文件 stdafx. h 中 添 


加 以 下 两 行 编码 ,实现 多 媒体 支持 : 


# include "mmsystem. h" 
# pragma comment( lib, "winmm. lib") 


9.2.11 界面 类 CFiveDlg 的 设计 


1. CFiveDlg 类 的 UML 定义 


CFiveDlg 类 是 整个 系统 的 主 界面 ,包含 了 菜单 元 素 、 棋 盘 CTable 元 素 和 一 个 悔 棋 的 按 


钮 ,其 界面 布局 如 图 9. 14 所 示 。CFiveDlg 类 的 成 员 变 
量 和 成 员 函 数 定义 如 图 9. 23 所 示 。 


2. 完成 CFiveDlg 类 的 设计 


CFiveDlg 类 定义 于 FiveDlg. h 和 FiveDlg. cpp 这 
两 个 文件 。 请 参照 程序 9.6 和 程序 9. 7 进行 学 习 。 
程序 9.6 主 界面 类 CFiveDlg 的 定义 


//FiveDlg.h: 头 文件 
# pragma once 
# include "Table. h" 


//CFiveD1g 对 话 框 
class CFiveDlg : public CDialogEx 
( 
// 构 造 
public: 
CDialog * m pDlg; 
CTable m Table; 


4 CFiveDlg 


* m hlcon : HICON 
+ m pDlg : CDialog * 
* m Table : CTable 
EE TS 
* CFiveDlg() 
* OnBnClickedBtnBack() 
* OnMenuAbout() 
+ OnMenuPcfirst() 
+ OnMenuPlayerfirst() 
# ««virtual»7OnlnitDialog() : BOOL 
# OnPaint() 
# OnQueryDraglcon() : HCURSOR 


图 9.23 CFiveDlg 的 UML 类 定义 


CFiveD1g(CWnd* pParent = NULL); // 标 准 构造 函数 
// 对 话 框 数 据 

enum ( IDD = IDD FIVE DIALOG ); 

protected: 

virtual void DoDataExchange(CDataExchange * pDX);  //DDX/DDV 支持 


protected: 
HICON m hIcon; 


// 生 成 的 消息 映射 函数 
virtual BOOL OnInitDialog(); 
afx nsg void OnPaint(); 
afx msg HCURSOR OnQueryDragIcon(); 
DECLARE MESSAGE MAP() 
public: 
afx msg void OnMenuAbout(); 
afx msg void OnMenuPlayerfirst(); 
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afx msg void OnMenuPcfirst(); 
afx msg void OnBnClickedBtnBack(); 
}; 


程序 9.7. 主 界面 类 CFiveDlg 的 实现 


//FiveDlg.cpp: 实现 文件 
# include "stdafx. h" 
include "Five. h" 

# include "FiveDlg.h" 

* include "afxdialogex. h" 


// 用 于 应 用 程序 “关于 ”菜单 项 的 CAboutDlg 对 话 框 
class CAboutDlg : public CDialogEx 
{ 
public: 
CAboutDlg(); 
// 对 话 框 数据 
enum { IDD = IDD ABOUTBOX }; 
protected: 
virtual void DoDataExchange(CDataExchange * pDX);  //DDX/DDV 支持 


protected: 
DECLARE MESSAGE MAP() 
}; 


CAboutDlg::CAboutDlg() : CDialogEx(CAboutDlg: : IDD) 
t) 


void CAboutD1g: : DoDataExchange( CDataExchange * pDX) 
{ 

CDialogEx: :DoDataExchange(pDX) ; 
) 


BEGIN MESSAGE MAP(CAboutDlg, CDialogEx) 
END MESSAGE MAP() 


//CFiveDlg 对 话 框 
CFiveDlg::CFiveDlg(CWnd * pParent /* = NULL * /) 
: CDialogEx(CFiveDlg::IDD, pParent) 
{ 
m_hIcon = AfxGetApp() -> LoadIcon(IDR MAINFRAME); 
} 


void CFiveDlg: :DoDataExchange( CDataExchange * pDX) 
{ 

CDialogEx: :DoDataExchange(PDX) ; 
} 


BEGIN MESSAGE MAP(CFiveDlg, CDialogEx) 
ON WM SYSCOMMAND() 
ON WM PAINT() 
ON WM QUERYDRAGICON() 
ON COMMAND(ID MENU ABOUT, &CFiveDlg::OnMenuAbout) 
ON COMMAND(ID MENU PlayerFirst, &CFiveDlg: :OnMenuPlayerfirst) 
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ON COMMAND(ID MENU PCFirst，&CFiveD1g: :OnMenuPcfirst) 
ON BN CLICKED(IDC BTN BACK, &CFiveDlg: :OnBnClickedBtnBack) 
END MESSAGE MAP() 


//CFiveDlg 消息 处 理 程序 

BOOL CFiveDlg: :OnInitDialog() 

{ 

CDialogEx: :OnInitDialog(); 
// 设 置 此 对 话 框 的 图 标 , 当 应 用 程序 主 窗 口 不 是 对 话 框 时 ,框架 将 自动 执行 此 操作 
SetIcon(m hIcon, TRUE); // 设 置 大 图 标 
SetIcon(m hIcon, FALSE); // 设 置 小 图 标 


//0D0: 在 此 添加 额外 的 初始 化 代码 

m pDlg = NULL; 

CRect rect(0, 0, 200, 200); 

m Table.CreateEx( WS EX CLIENTEDGE, T("ChessTable"), NULL, WS VISIBLE | WS BORDER | WS. 
CHILD, 

CRect( 0, 0, 480, 509 ), this, IDC TABLE ); 

// 设 置 双方 姓名 

SetDlgItemText( IDC ST ME, m Table.m strMe ); 

SetDlgItemText( IDC_ST_ENEMY，_T(" 计 算 机 ") ); 

// 禁 用 “再 玩 ” 和 “离开 ” 

CMenu * pMenu = GetMenu(); 

pMenu — > EnableMenuItem( ID MENU PLAYAGAIN, MF DISABLED | MF GRAYED | MF BYCOMMAND ); 

pMenu -> EnableMenuItem( ID MENU LEAVE, MF DISABLED | MF GRAYED | MF BYCOMMAND ) ; 

m Table.Clear( TRUE ); 
GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 

GetDlgItem(IDC TABLE) 一 > SetFocus(); 
return FALSE; // 除 非 将 焦点 设置 到 控件 ,否则 返回 TRUE. 
} 


// 如 果 向 对 话 框 添加 最 小 化 按钮 , 则 需要 下 面 的 代码 
// 来 绘制 该 图 标 .对 于 使 用 文档 /视图 模型 的 MEC 应 用 程序 ， 
// 这 将 由 框架 自动 完成 
void CFiveDlg: :OnPaint() 
{ 

CPaintDC dc(this); // 用 于 绘制 的 设备 上 下 文 

if (IsIconic()) 

{ 

SendMessage(WM ICONERASEBKGND, reinterpret cast < WPARAM>(dc.GetSafeHdc()), 0); 


// 使 图 标 在 工作 区 矩形 中 居中 
int cxIcon = GetSystemMetrics(SM CXICON); 
int cylcon = GetSystemMetrics(SM CYICON); 


CRect rect; 
GetClientRect(&rect); 

int x = (rect.Width() — cxIcon + 1) / 2; 
int y = (rect.Height() - cyIcon + 1) / 2; 
// 绘 制图 标 


dc.DrawIcon(x, y, m hIcon); 


) 


else 


t 
CDialogEx: :OnPaint(); 
} 
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} 


// 当 用 户 拖 动 最 小 化 窗口 时 系统 调用 此 函数 取得 光标 显示 
HCURSOR CFiveDlg: :OnQueryDragIcon( ) 
{ 


return static_cast < HCURSOR»(m hlcon); 


} 
// 关 于 对 话 框 
void CFiveDlg: :OnMenuAbout( ) 
{ 
//TOD0: 在 此 添加 命令 处 理 程序 代码 
CAboutDlg dlg; 
dlg. DoModal() ; 


) 
// 玩 家 先 走 
void CFiveDlg: :OnMenuPlayerfirst() 


{ 
//TODO: 在 此 添加 命令 处 理 程序 代码 
GetDlgItem( IDC_BTN_BACK ) 一 > EnableWindow( FALSE ); 
m Table. Accept( 1 ); 
) 


// 计 算 机 先 走 
void CFiveDlg: :OnMenuPcfirst() 


{ 
//TODO: 在 此 添加 命令 处 理 程序 代码 
GetDlgItem( IDC_BTN_BACK ) 一 > EnableWindow( FALSE ); 
m Table. SetColor( 1 ); 
m Table. Clear( FALSE ); 
m Table.SetGameMode( 1 ); 
) 
// 悔 棋 
void CFiveDlg: :OnBnClickedBtnBack() 
{ 
//T0D0: 在 此 添加 控件 通知 处 理 程序 代码 
m Table. Back(); 
) 


9.2.12 项 目测 试 


CD 成 功 编译 运行 的 初始 界面 如 图 9. 14 所 示 ,可 见 悔 棋 按钮 一 开始 是 禁用 的 。 

(2) 选择 “开始 人 机 对 战 一 玩家 先行 ”命令 ,玩家 执 黑 与 计算 机 较量 的 某 一 局 结果 如 
图 9. 24 所 示 ,在 这 期 间 ,玩家 可 以 测试 “ 悔 槛 ”功能 , 且 一 次 只 能 向 前 悔 一 步 ,注意 聆听 落 子 
声音 和 棋局 结束 时 的 伴奏 是 否 正确 。 图 9.24 所 示 的 较量 是 计算 机 赢得 了 比赛 ,大 家 玩 过 了 
才 会 知道 ,对 于 菜鸟 级 的 选手 来 说 ,要 赢 计算 机 一 盘 棋 ,还 真是 不 容易 。 

(3) 再 来 测试 计算 机 执 黑 先行 ,选择 “开始 人 机 对 战 一 计算 机 先行 命令 ,计算 机 会 先 在 
天 元 处 落 子 。 如 果 玩 家 先行 赢 不 了 比赛 ,那么 计算 机 先行 ,挑战 就 更 大 了 。 众 所 周知 ,五 子 
棋 是 对 先 手 一 方 有 利 的 博弈 类 游戏 。 图 9. 25 给 出 了 计算 机 先行 的 某 一 局 比赛 结果 ,计算 机 
再 一 次 赢得 了 比赛 。 

要 想 赢 得 比赛 ,除了 勤学 苦 练 以 外 ,还 是 有 方法 的 ,多 掌握 一 点 五 子 棋 的 开局 定式 ,战胜 
计算 机 就 容易 多 了 。 


392, Windows 网 络 编程 案例 教程 


`. 


Ix 


d) WT. FRED. ARUMOLZ en 


图 9.25 计算 机 先行 ,计算 机 又 赢 了 


6.3 网 络 对 战 系统 设计 


网 络 对 战 是 一 种 很 好 的 比赛 模式 。 人 机 对 战 系统 搭 好 了 一 个 架子 ,网 络 对 战 在 此 基础 
上 进行 改造 ,使 得 人 机 对 战 变 成 网 络 对 战 。 由 人 机 对 战 的 设计 转 到 网 络 对 战 的 设计 ,也 是 一 
个 由 易 到 难 渐进 的 过 程 。 
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9.3.1 扩展 功能 需求 


网 络 对 战 在 功能 上 的 扩展 主要 如 下 : 

(1) 悔 棋 方式 与 人 机 对 战 不 同 , 需 要 征 得 对 方 同 意 , 如 果 对 方 不 同意 , 则 不 能 悔 棋 。 

(2) 玩家 的 一 方 可 以 提出 和 棋 要 求 , 如 果 另 一 方 玩家 表示 同意 , 则 和 棋 ,否则 不 能 和 棋 ， 
需要 继续 玩 下 去 。 

(3) 玩家 的 一 方 可 以 提前 认输 ,本 棋局 结束 。 

(4) 一 局 棋 结 束 后 ,玩家 的 一 方 可 以 提议 再 开 一 局 ,如 果 另 一 方 接受 , 则 新 棋局 开始 , 否 
则 不 能 再 次 开局 ,只 好 等 待 新 的 玩家 加 入 。 

(5) 玩家 可 以 通过 网 络 聊天 的 方式 沟通 交流 。 


9.3.2 定义 对 话 消息 
打开 Message.h 文 件 ,增加 以 下 宏 常 量 消息 定义 : 


// 定 义 各 种 消息 

# define MSG ROLLBACK 0x02 // 悔 棋 

# define MSG AGREEBACK 0x03 // 同 意 悔 棋 
#define MSG_REFUSEDBACK 0x04 // 拒 绝 悔 棋 
# define MSG DRAW 0x05 / [REC 

# define MSG AGREEDRAW — 0x06 // 同 意 和 棋 
# define MSG REFUSEDRAW 0x07 / [3826 RU 
# define MSG GIVEUP 0x08 // 认 输 

# define MSG_CHAT Ox09 // 聊 天 

# define MSG OPPOSITE Ox0a // 对 方 发 信 
#define MSG PLAYAGAIN 0x0b // 再 次 开局 
i define MSG AGREEAGAIN 0x0c // 同 意 再 次 开局 


9.3.3 网 络 对 战 新 增 界面 元 素 
根据 表 9. 3 定义 新 增 界面 元 素 的 属性 ,创建 网 络 对 战 主 界面 如 图 9. 26 所 示 。 


图 9.26 网 络 对 战 主 界面 
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注意 : £ 9.3 中 的 最 后 四 行 已 在 人 机 对 战 界面 中 设计 完成 。 
表 9.3 网 络 对 战 新 增 元 素 的 属性 定义 


控件 ID 控件 标题 控件 类 型 备 注 
IDC_BTN_QHQ 求 和 棋 按钮 
IDC_BTN_LOST 认输 了 按钮 
IDC_STATIC4 NX. 静态 文本 
IDC CMB CHAT x 组 合 框 
IDC_EDT_CHAT 无 编辑 框 只 读 , 多 行 
IDC_BTN_BACK 侮 一 步 按钮 
IDC_ST_ME 玩家 静态 文本 
IDC ST ENEMY 对 手 静态 文本 
IDC_STATIC3 无 图 标 Icon Image 为 IDLICON_PK 


编译 运行 ,改造 后 的 主 界面 如 图 9. 27 所 示 。 不 过 这 时 的 按钮 还 不 能 响应 玩家 的 操作 ， 
后 面 设计 完成 网 络 通信 步骤 后 再 增加 事件 响应 琢 数 到 CFiveDlg 类 。 对 于 菜单 部 分 已 经 在 
设计 人 机 对 战 时 一 并 考虑 ,请 读者 参照 表 9. 2 的 定义 。 各 菜单 项 的 命令 响应 函数 也 在 完成 
各 相关 功能 后 再 添加 到 CFiveDlg 类 中 。 


9.27 网 络 对 战 初始 界面 


9.3.4 网 络 对 战 基 本 类 图 


为 了 实现 网 络 通信 ,用 户 需 要 自 定义 一 个 网 络 套 接 字 类 CFiveSocket, 它 派生 自 
CAsyncSocket 类 。 为 了 描述 网 络 玩家 的 行为 模式 ,需要 再 定义 一 个 新 的 游戏 模式 类 
CTwoGame, 它 派生 自 CGame 类 。 除 此 以 外 ,还 需要 定义 发 起 游戏 的 对 话 框 类 
CServerDlg、 加 入 游戏 的 对 话 框 类 CClientDlg、 更 改 玩家 姓名 的 对 话 框 类 CNameDlg 和 战绩 
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统计 的 对 话 框 类 CStatDlg。 这 些 新 增 类 和 原 有 类 的 关系 如 图 9. 28 所 示 。 


sS s COneGame [ 1 
= CNameDl 
CNameDle |Z) CNameDlg 2 == = B STEP 
了 as IS 4! CFiveApp A COneGame srp 四 sm | 
1 COncGame 1 
yr zp m STEP 
CstatDlg rn CStatDIg asss chua 1 已 特性 S 
red i S ME 已 操作 日 操作 1 
CServerblg |CFiveApp( D1 srep 1 
CServerDig |) CserverDlg — S Crivepig | CFivebI8 y 1 
[1] CFiveDlg | 8 CriveDlg CGame A CGame 
;_ E 
— a 7 === 1 
¥) CClientDk [一 一 一 | 日 特性 LI. ^ 
d CFiveDlg ] 5 CGame 
EFT BEES - 
1 
CClientDig | 1 Lam CFiveDlg V1 | 
CClieniDlg cu Che i 1 MSGSTRUCU 1 
able 1 
= crable ! = = MSGSTRUCT 
— ác S 4 Crable : ! A  CTwoGame | MsGsrRucr | 2 MSGSTRUCT| S 
— i Pi 1 CTwoGame 
* 日 
Crac P| * Ft Kk---'|ent 1 rS 
(| CFiveSocket Clabiec— E 操作 EET = wr 
Criso T : x 
: €@ CT Ñi "m CTwoGame | 1 MSGSTRUCT 1 
ane Crivegocket CTable CTA = = 
日 操作 š J | 
1 


图 9.28 网 络 对 战 UML 类 图 


9.3.5 网 络 对 战 通信 模型 
网 络 上 甲乙 两 个 玩家 通过 网 络 进 行 五 子 棋 对 战 的 基本 通信 模型 如 图 9. 29 所 示 。 从 软 
件 架构 的 角度 理解 ,可 以 将 通信 过 程 分 成 用 户 界面 层 ` 棋 盘 处 理 层 和 套 接 字 通 信 3 个 层次 。 
根据 这 个 通信 模型 和 图 9. 28 给 出 的 新 增 类 的 工作 关系 ,后 面 将 分 步 完成 网 络 对 战 项 目的 


构建 。 
网 络 玩家 甲 方 网 络 玩 家 乙方 
MSG_DROPDOWN 2 
a CFiveApp ar CFiveApp " 
用 户 界面 层 MSG_ROLLBACK 用 户 界面 层 
CFiveDlg MSG AGRÉEBACK CFiveDlg 
MSG REFUSEDBACK 
MSG DRAW 
棋盘 处 理 层 | CTable La - MSG AGREEDRAW EP CTable | 棋盘 处 理 层 
CTwoGame MSG_REFUSEDRAW CTwoGame 
3 MSG GIVEUP " 
回调 MSG CHAT 回调 
MSG OPPOSITE 
套 接 字 通 信 一 | CFiveSocket MSG_PLAYAGAIN CFiveSocket |— 
" MSG AGREEAGAIN 套 接 字 通 信 
OnAccept() E - OnAccept () 
OnConnect () 载 的 事件 函数 OnConnect () 
OnReceive() OnReceive() 
OnClose() OnClose() 


图 9.29 网络 对 战 通信 模型 
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通过 图 9. 29 所 示 的 通信 模型 ,大 家 可 以 看 出 甲乙 双方 扮演 的 通信 和 角色 , 既 有 服务 器 的 
功能 ,又 有 客户 机 的 功能 。 甲 、 乙 双方 既 能 作为 服务 器 等 待 其 他 玩家 加 入 ,也 能 作为 客户 机 
主动 连接 服务 器 ; 既 能 处 理 收 到 的 消息 ,也 能 向 对 方 发 送 消息 。 棋 盘 处 理 层 负 责 消息 的 分 
类 处 理工 作 , 触 发 机 制 由 套 接 字 的 回调 机 制 完 成 。 


9.3.6 CFiveSocket 类 的 设计 


在 解决 方案 资源 管理 器 的 项 目 名 称 Five 上 右 击 ,在 快捷 菜单 中 选择 “添加 一 类 ”命令 ， 
弹出 添加 类 对 话 框 ,选择 MFC 类 , 单 击 “ 添 加 ”按钮 ,进入 MFC 添加 类 向 导 , 然 后 设 定 类 名 
为 CFiveSocket, 选择 基 类 为 CAsyncSocket、 头 文件 为 FiveSocket. h、 程 序 文件 为 
FiveSocket. cpp, 单 击 “ 完 成 ”按钮 , 则 CFiveSocket 类 的 基本 框架 创建 完成 。 

在 项 目 名 称 Five 上 右 击 ,在 快捷 菜单 中 选择 “类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 将 类 名 
选择 为 CFiveSocket, 然 后 切换 到 “ 虚 函 数 ” 选 项 卡 , 重 载 OnAccept、OnConnect、OnReceive、 
OnClose iX 4 个 虚 函 数 ,如 图 9. 30 所 示 。 单 击 “ 完 成 ”按钮 , 则 4 个 虚 函 数 的 代码 将 自动 添 
加 到 FiveSocket. h 和 FiveSocket. cpp 中 。 


LLLLIM 
MERV 
LI 


说 明 : 调用 以 通知 套 接 字 它 可 以 接收 呼叫 


9.30 重 载 CFiveSocket 类 的 4 个 虚 函 数 


打开 FiveSocket. h 文件 ,查看 CFiveSocket 类 的 定义 ,如 程序 9. 8 所 示 。 
程序 9.8 套 接 字 通 信 类 CFiveSocket 的 定义 


//CFiveSocket 类 的 定义 
# pragma once 
class CFiveSocket : public CAsyncSocket 
t 
public: 
CFiveSocket(); 
virtual —CFiveSocket(); 
virtual void OnAccept(int nErrorCode); 


第 9 章 MAETI 


virtual void OnConnect(int nErrorCode); 
virtual void OnReceive(int nErrorCode); 
virtual void OnClose(int nErrorCode); 
}; 
打开 FiveSocket. cpp 文件 ,完成 CFiveSocket 类 成 员 函 数 的 编码 ,如 程序 9. 9 所 示 。 
程序 9.9 套 接 字 通 信 类 CFiveSocket 的 实现 
/ [FiveSocket. cpp: 实 现 文件 
# include "stdafx. h" 


# include "Five. h" 
# include "FiveSocket. h" 


# include "Table. h" // 手 动 添加 
# include "FiveDlg.h" // 手 动 添加 
//CFiveSocket 


CFiveSocket::CFiveSocket() ( } 
CFiveSocket: :一 CEiveSocket() ( ) 


#if 0 

BEGIN MESSAGE MAP(CFiveSocket, CAsyncSocket) 

END MESSAGE MAP() 

# endif 410 


//CFiveSocket 成 员 函 数 
void CFiveSocket : :OnAccept( int nErrorCode) 
{ 
//TOD0: 在 此 添加 专用 代码 或 调用 基 类 
CFiveDlg * pDlg = (CFiveDlg * )AfxGetMainWnd(); 
// 使 本 窗口 生效 
pDlg -> EnableWindow(); 
delete []pDlg->m_pDlg; 
pDlg-»m pDlg = NULL; 
pDlg-» m Table. Accept( 2 ); 
pDlg-» GetDlgItem( IDC BTN QHQ ) -> EnableWindow( TRUE ); 
pD1g — > GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
pD1g — > GetDlgItem( IDC CMB CHAT ) 一 > EnableWindow( TRUE ); 
pD1g — > GetDlgItem( IDC BTN LOST ) -> EnableWindow( TRUE ); 
pDlg-»m Table.SetMenuState( FALSE ); 


void CFiveSocket: :OnConnect(int nErrorCode) 
{ 
//ToD0: 在 此 添加 专用 代码 或 调用 基 类 
CTable * pTable = (CTable * )AfxGetMainiWnd() 一 > GetDlgItem( IDC TABLE ); 
pTable-»m bConnected = TRUE; 
pTable — > Connect( 2 ); 


void CFiveSocket: :OnReceive(int nErrorCode) 
{ 
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//T0D0: 在 此 添加 专用 代码 或 调用 基 类 
CTable * pTable = (CTable * )AfxGetMainWnd() 一 > GetDlgItem( IDC TABLE ); 
pTable -> Receive(); 

) 


void CFiveSocket: :OnClose(int nErrorCode) 
( 
//Topo: 在 此 添加 专用 代码 或 调用 基 类 
CFiveDlg * pDlg = (CFiveDlg * )AfxGetMainWnd(); 
pDlg- > MessageBox ( _T(" 对 方 已 经 离开 游戏 , k H BESERECRGR."), ("EPR"), MB_ 
ICONINFORMATION); 
// 禁 用 所 有 项 目 , 并 使 菜单 生效 
pD1g — > GetDlgItem( IDC BTN QHQ ) -> EnableWindow( FALSE ); 
pDlg-» GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
pDlg-» GetDlgItem( IDC CMB CHAT ) 一 > EnableWindow( FALSE ); 
pDlg-» GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 
pDlg-»m Table.SetMenuState( TRUE ); 
pD1g — > GetMenu( ) - > EnableMenultem( ID MENU PLAYAGAIN, MF BYCOMMAND | MF GRAYED | MF- 
DISABLED ) ; 
pDlg-»m Table.SetWait( TRUE ); 
// 重 新 设置 对 方 姓名 
pD1g -> SetD1gItemText( IDC_ST_ENEMY，_T(" 无 玩家 加 入 ") ); 


9.3.7 CTwoGame 类 的 设计 


大 家 还 记得 COneGame 类 吗 ? CTwoGame 类 是 它 的 “兄弟 ”, 专 为 网 络 对 战 模式 设计 。 
打开 Game.h 文 件 , 添 加 CTwoGame 类 的 定义 ,如 程序 9. 10 所 示 。 然 后 打开 Game. cpp 文 
件 , 添 加 CTwoGame 类 的 实现 代码 ,如 程序 9. 11 所 示 。 

程序 9.10 网 络 对 战 类 CTwoGame 的 定义 


/ /CTwoGane 类 的 定义 

class CTwoGame : public CGame 

{ 

public: 
CTwoGame( CTable * pTable ) : CGame( pTable ) {} 
virtual — CTwoGame( ) ; 
virtual void Init(); 
virtual void Win( const STEP& stepSend ); 
virtual void SendStep( const STEP& stepSend ); 
virtual void ReceiveMsg( MSGSTRUCT * pMsg ); 
virtual void Back(); 

}; 


程序 9.11 网 络 对 战 类 CTwoGame 的 实现 


//CTwoGame 类 的 实现 部 分 
CTwoGame: : ~CTwoGame( ) 
CI 

void CTwoGame: : Init() 
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void CTwoGame: :Win( const STEP& stepSend ) 
{ 
SendStep( stepSend ); 
} 
void CTwoGame: :SendStep( const STEP& stepPut ) 
{ 
MSGSTRUCT msg; 
msg. uMsg = MSG DROPDOWN; 
msg.color = stepPut. color; 
msg.x = stepPut.x; 
msg.y = stepPut. y; 
m pTable- m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
) 
void CTwoGame::ReceiveMsg( MSGSTRUCT * pMsg ) 
{ 
int nRet = m pTable—>m clientSocket.Receive( pMsg, sizeof( MSGSTRUCT ) ); 
if ( SOCKET ERROR -- nRet ) 
t 
AfxGetMainWnd() -> MessageBox( _T(" 接 收 数据 时 发 生 错误 ,请 检查 您 的 网 络 连接 .")， 
—T( EUR"), MB ICONSTOP ) ; 
) 
) 
void CTwoGame: : Back( ) 
{ 
CDialog * pDlg = (CDialog * )AfxGetMainWnd(); 
// 使 按钮 失效 
pDlg-» GetDlgItem( IDC BTN BACK ) -> EnableWindow( FALSE ); 
pDlg -> GetDlgItem( IDC BTN QHQ ) -> EnableWindow( FALSE ); 
pDlg-» GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 
// 设 置 等 待 标志 
m pTable-» SetWait( TRUE ); 
MSGSTRUCT nsg; 
msg.uMsg - MSG ROLLBACK; 
m pTable- m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
) 


m pTable— 7m clientSocket. Send() 用 于 回调 CTable 类 中 的 连接 套 接 字 对 象 m_ 
clientSocket ,关于 对 CTable 类 的 修改 请 读者 参见 下 面 的 介绍 。 


9.3.8 修改 CTable 类 的 设计 


对 于 CTable 这 个 棋盘 类 ,不 采用 重新 设计 的 方法 ,而 是 在 人 机 对 战 的 基础 上 进行 扩 
展 ,新 增 的 成 员 变 量 和 成 员 函 数 如 图 9. 31 Bros. Pe rp Hbc bs CE I] 3 个 成 员 变量 和 6 个 成 员 
函数 是 新 加 的 ,用 4 标注 的 5 个 成 员 函 数 是 与 人 机 对 战 共 用 的 函数 ,需要 对 它们 进行 修改 以 
同时 处 理 两 种 游戏 模式 。 

打开 Table.h 文件 ,对 CTable 类 进行 修改 ,如 程序 9. 12 所 示 。 
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9 CTable 
= 特性 
+ m bConnected : BOOL + 
+ m bOldWeit : BOOL 
+ m clientSocket : CFiveSocket Jr 
+ m data : int[15][15] 
+ m serverSocket : CFiveSocket f 
+ m strgainst : String 
+ m stre : CString 
- Draw( x:int, v:int, color : int) 
- m bWait : BOOL 
-m color : int 
- m iml : Clnagelist 
- m pGame : CGame * 
= 操作 
+ ««const?GetColor() : int 
+ C<eonst>>Win(eolor : int) : BOOL 
+ Accept (nGameMode : int) 4 
+ Back 0 
+ Chat(lpszMsg : LPCTSTR) $e 
+ Clear(bWait : BOOL) 
+ Connect (nGameMode : int) Jy 
+ Clable() 
+ DrasGane() He 
+ GiveUp) *& 
+ OnLButtonUp(nFlags : UINT, point : CPoint)4 
+ OnPaint Ó 
+ Playágain() 3 
+ Receive) 4 
+ RestoreWait() 
+ SetColor(color : int) 
+ SetData(x : int, y : int, color : int) 
+ SetGanellode(nGamelode : int) 4 
+ SetMenuState(bEnable : BOOL) fr 
+ SetWait(bWait : BOOL) : BOOL 
+ StepOver() 4 


` CTable () 
ee 


图 9.31 网 络 对 战 CTableUML 类 图 
程序 9.12 修改 棋盘 类 CTable 


// 以 下 9 项 是 网 络 对 战 增加 部 分 

public: 

CFiveSocket m serverSocket; // 服 务 器 套 接 字 
CFiveSocket m clientSocket; // 客 户 机 套 接 字 
// 是 否 连 接 网 络 (客户 端 使 用 ) 


BOOL m bConnected; 

void PlayAgain(); 

void GiveUp(); 

void Chat( LPCTSTR lpszMsg ); 

void DrawGame(); 

void Connect( int nGameMode ); 
void SetMenuState( BOOL bEnable ); 


打开 Table. cpp 文件 ,添加 CTable 类 的 6 个 新 增 成 员 函 数 : 


U OOOOOOOUODOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOK 


// 一 一 -一 -一 - 以 下 6 个 函数 为 网 络 对 战 新 增加 的 ----------- 


U OOODOOOUODOOOOOOOOOOOOOOOOOOOOOOOOOOOOOEK 
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// 发 送 再 玩 一 次 请 求 
void CTable::PlayAgain() 
{ 
MSGSTRUCT msg; 
msg. uMsg = MSG PLAYAGAIN; 
m clientSocket. Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
) 


// 发 送 和 棋 请 求 
void CTable: :DrawGame( ) 
( 
CDialog * pDlg = (CDialog * )AfxGetMainWnd(); 
// 使 按钮 失效 
pD1g — > GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
pD1g — > GetDlgItem( IDC BTN QHQ ) —» EnableWindow( FALSE ); 
pDlg-» GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ) ; 
// 设 置 等 待 标志 
SetWait( TRUE ); 
MSGSTRUCT msg; 
msg. uMsg = MSG DRAW; 
m clientSocket. Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
) 


// 设 置 菜单 状态 (主要 为 网 络 对 战 准备 ) 
void CTable: :SetMenuState( BOOL bEnable ) 
( 
UINT uEnable, uDisable; 
if ( bEnable ) 
{ 
uEnable = MF ENABLED; 
uDisable - MF GRAYED | MF DISABLED; 
) 
else 
{ 
uEnable = MF GRAYED | MF DISABLED; 
uDisable - MF ENABLED; 
) 
CMenu * pMenu = GetParent() -> GetMenu() ; 
pMenu- > GetSubMenu( 0 ) — > EnableMenuItem( 0, uEnable | MF BYPOSITION ); 
pMenu — EnableMenuItem( ID MENU SERVER, uEnable ); 
pMenu — > EnableMenultem( ID MENU CLIENT, uEnable ); 
pMenu -> EnableMenuItem( ID MENU LEAVE, uDisable ); 
pMenu — > EnableMenultem( ID MENU PLAYAGAIN, uEnable ); 
) 


// 主 动 连接 
void CTable: :Connect( int nGameMode ) 
( 
SetColor( 1); 
Clear( TRUE ); 
SetGameMode( nGameMode ); 
) 


// 发 送 聊天 消息 
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void CTable: :Chat( LPCTSTR lpszMsg ) 


{ 


} 


MSGSTRUCT msg; 
msg. uMsg = MSG CHAT; 
lstrcpy( msg. szMsg, lpszMsg ); 


m clientSocket. Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 


// 发 送 认 输 消息 
void CTable: :GiveUp() 


{ 


) 


CFiveApp * phpp = (CFiveApp * )AfxGethpp(); 

phpp-»m nLoste*; 

CDialog * pDlg = (CDialog * )AfxGetMainWnd(); 

// 使 按钮 失效 

pDlg-» GetDlgItem( IDC BTN BACK ) -> EnableWindow( FALSE ) ; 
pD1g — > GetDlgItem( IDC BTN QHQ ) -> EnableWindow( FALSE ); 
pDlg -> GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 
// 修 改 等 待 状态 

SetWait( TRUE ); 

// 生 效 菜单 项 

CMenu * pMenu = pDlg- > GetMenu(); 

pMenu — EnableMenuItem( ID MENU PLAYAGAIN, MF ENABLED | MF BYCOMMAND ); 


// 发 送 认输 消息 
MSGSTRUCT msg; 
msg.uMsg = MSG GIVEUP; 


m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 


对 部 分 人 机 对 战 中 的 函数 进行 扩展 ,同时 处 理 人 机 对 战 和 网 络 对 战 两 种 情况 。 


( 
/ 


v 


( 


) 
( 


/ 


1) 修改 SetGameMode 函数 


/设置 游戏 模式 ,共用 函数 
oid CTable: :SetGameMode( int nGameMode ) 


if ( 1 == nGameMode ) 


m_pGame = new COneGame( this ); // 创 建 人 机 游戏 对 象 
else 

m_pGame = new CTwoGame( this ); // 创 建 网 络 对 战 游戏 对 象 
m_pGame 一 > Init(); // 初 始 化 游戏 


2) 修改 StepOver 函数 ,新 增 代码 如 下 : 
/网 络 对 战 新 增 部 分 


pDlg -> GetDlgItem( IDC BTN QHQ ) -> EnableWindow( FALSE ); 
pDlg — > GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 


/ 
i 


{ 
} 


/如 果 是 网 络 对 战 , 则 生效 “ 重 玩 ” 
f ( m bConnected ) 


pDlg — > GetMenu() — > EnableMenuItem( ID MENU PLAYAGAIN, MF ENABLED | MF BYCOMMAND ); 
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(3) 修改 Accept 函数 ,新 增 代码 如 下 : 


if ( 2 == nGameMode ) // 网 络 对 战 模式 
{ 
m serverSocket. Accept( m clientSocket ); 
) 


(4) 修改 Receive 函数 ,使 其 能 处 理 各 种 消息 ,新 增 代 码 如 下 : 


// 接 收 来 自 对 方 的 数据 ,第 2 个 case 后 面 的 代码 为 网 络 对 战 扩展 部 分 ,可 以 处 理 更 多 的 消息 
void CTable: :Receive() 
( 
MSGSTRUCT nsgRecv; 
m pGame 一 > ReceiveMsg( &msgRecv ); 
// 对 各 种 消息 分 别 进行 处 理 
switch ( msgRecv. uMsg ) 
{ 
case MSG DROPDOWN: 
t 
PlaySound( MAKEINTRESOURCE( IDR WAVE PUT ), NULL, SND RESOURCE | SND SYNC ); 
SetData( msgRecv.x, msgRecv. y, msgRecv. color ); 
// 大 于 一 步 才能 悔 棋 
GetParent()- > GetDlgItem( IDC_BTN_BACK ) — > EnableWindow( m pGame- > m. 
StepList.size() » 1); 
Stepover(); 
) 
break; 
// 网 络 对 战 在 此 处 处 理 网 络 消息 
case MSG ROLLBACK: 
ji 
if ( IDYES == GetParent() -> MessageBox( _T(" 对 方 请 求 悔 棋 , 接受 这 个 请 求 吗 ?")， 
_T(" 悔 棋 ")，MB_ICONQUESTION | MB YESNO ) ) 
{ 
// 发 送 允 许 悔 棋 消息 
MSGSTRUCT msg; 
msg.uMsg - MSG AGREEBACK; 
m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
// 给 自己 悔 棋 
STEP step; 
step = *( m pGame—-» m StepList.begin() ); 
m pGame-? m StepList.pop front(); 
m data[step.x][step.y] = -1; 
step = *( m pGame-» m StepList.begin() ); 
m pGame -»m StepList.pop front(); 
m data[step.x][step.y] = -1; 
// 大 于 一 步 才能 悔 棋 


GetParent() -> GetDlgItem( IDC BTN BACK ) - > EnableWindow( m_pGame - > m. 


StepList.size() »1); 

Invalidate(); 

} 

else 

{ 
// 发 送 不 允许 悔 棋 消息 
MSGSTRUCT msg; 
msg.uMsg - MSG REFUSEDBACK; 
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`. 


m_clientSocket. Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 

I 

} 

break; 

case MSG_REFUSEDBACK: 

{ 
CDialog * pDlg = (CDialog * )AfxGetMainWnd(); 
pD1g -> MessageBox( _ T ( " R fü dk, 对 方 拒绝 了 您 的 悔 棋 请 求 .")，_T(" 悔 棋 ")，MB_ 

ICONINFORMATION ); 

pDlg-» GetDlgItem( IDC BTN BACK ) -> EnableWindow(); 
pDlg -> GetDlgItem( IDC BTN QHQ ) -> EnableWindow(); 
pDlg -> GetDlgItem( IDC BTN LOST ) -> EnableWindow(); 
RestoreWait(); 

} 

break; 

case MSG AGREEBACK: 

t 
STEP step; 
step = *( m pGame- » m StepList.begin() ); 
m pGame -»m StepList.pop front(); 
m data[step.x][step.y] = -1; 
Step = *( m pGame- > m StepList.begin() ); 
m pGame — > m StepList.pop front(); 
m data[step.x][step.y] = -1; 


CDialog * pDlg = (CDialog * )AfxGetMainWnd(); 
pDlg -> GetDlgItem( IDC BTN QHQ ) -> EnableWindow(); 
pDlg -> GetDlgItem( IDC BTN LOST ) -> EnableWindow(); 
// 大 于 一 步 才能 悔 棋 
pD1g -> GetDlgItem( IDC_BTN_BACK) — > EnableWindow(m pGame- >m StepList. size()» 1); 
RestoreWait(); 
Invalidate(); 
) 
break; 
case MSG DRAW: 
t 
if ( IDYES == GetParent() -> MessageBox( _T(" 对 方 请 求 和 棋 , 接 受 这 个 请 求 吗 ?")， 
—T("füfit"), MB ICONQUESTION | MB_YESNO ) ) 
t 
CFiveApp * pApp = (CFiveApp * )AfxGetApp(); 
pApp-»m nDrawt*; 
// 发 送 允 许 和 棋 消息 
MSGSTRUCT msg; 
msg. uMsg = MSG AGREEDRAW; 
m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
// 和 棋 后 ,禁用 按钮 和 棋盘 
CDialog * pDlg = (CDialog * )GetParent(); 
pD1g — > GetDlgItem( IDC BTN QHQ ) -> EnableWindow( FALSE ); 
pD1g — > GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 
pD1g — > GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
SetWait( TRUE ); 
// 使 “ 重 玩 "菜单 生效 
pD1g — > GetMenu( ) —> EnableMenuTtem(ID MENU PLAYAGAIN,MF ENABLED|MF BYCOMMAND) ; 


} 
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else 


// 发 送 拒绝 和 棋 消 息 

MSGSTRUCT msg; 

msg. uMsg = MSG REFUSEDRAW; 

m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
) 


break; 
case MSG AGREEDRAW: 


{ 


CFiveApp * PRPP = (CFiveApp * )AfxGetApp(); 

pApp-»m nDraw**; 

CDialog * pDlg - (CDialog * )GetParent(); 

pDlg-» MessageBox( T("jfüok JUI #ti* xi, 对 方 接受 了 您 的 和 棋 请 求 .")，_T(" 和 


Tt"), MB ICONINFORMATION ) 


) 


// 和 棋 后 ,使 “ 重 玩 ? 菜 单 生 效 
pDlg -> GetMenu( ) - > EnableMenuItem( ID MENU PLAYAGAIN, MF ENABLED | MF BYCOMMAND ) 


break; 
case MSG REFUSEDRAW: 


{ 


) 


CDialog * pDlg = (CDialog * )GetParent(); 

pDlg-» MessageBox( _T(" 看 来 对 方 很 有 信心 取得 胜利 ,所 以 拒绝 了 您 的 和 棋 请 求 .")， 
_T(" 和 棋 "),，MB_ICONINFORMATION ); 

// 重 新 设置 按钮 状态 ,并 恢复 棋盘 状态 

pD1g -> GetDlgItem( IDC BTN BACK ) -> EnableWindow(); 

pDlg -> GetDlgItem( IDC BTN QHQ ) -> EnableWindow(); 

pD1g -> GetDlgItem( IDC BTN LOST ) -> EnablelWindow(); 

RestoreWait(); 


break; 
case MSG CHAT: 


í 


) 


CString strAdd; 

strAdd.Format( _T(" %s 说: % s\r\n"), m strAgainst, msgRecv. szMsg ); 
CEdit *pEdit = (CEdit * )GetParent() -> GetDlgItem( IDC EDT CHAT ); 
pEdit-»SetSel( —1, - 1, TRUE ); 

pEdit -> ReplaceSel( strAdd ); 


break; 
case MSG OPPOSITE: 


{ 


m strAgainst = msgRecv. szMsg; 
GetParent() -> GetDlgItem( IDC ST ENEMY ) 一 > SetWindowText( m strAgainst ); 


// 在 先 手 接 到 姓名 信息 后 , 回 返 自己 的 姓名 信息 
if ( O == m color) 
{ 

MSGSTRUCT msg; 

msg.uMsg - MSG OPPOSITE; 

lstrcpy( msg. szMsg, m strMe ); 


m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 
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) 
} 
break; 
case MSG GIVEUP: 
t 
CFiveApp * pApp = (CFiveApp * )AfxGetApp(); 
pApp-»m nWine*; 
CDialog *pDlg = (CDialog * )GetParent(); 
pDlg - > MessageBox ( _T(" 对 方 已 经 投 子 认输 ,恭喜 您 不 战 而 届 人 之 兵 !")，_T(" 胜 
利 "), MB_ICONINFORMATION ); 
// 禁 用 各 按钮 及 棋盘 
pDlg -> GetDlgItem( IDC BTN BACK ) -> EnableWindow( FALSE ); 
pDlg -> GetDlgItem( IDC BTN QHQ ) 一 > EnableWindow( FALSE ); 
pD1g -> GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 
SetWait( TRUE ); 
// 设 置 “ 重 玩 ” 为 真 
pD1g — > GetMenu( ) - EnableMenuItem( ID MENU PLAYAGAIN, MF ENABLED | MF_BYCOMMAND ); 
) 
break; 
case MSG_PLAYAGAIN: 
{ 
CDialog * pDlg = (CDialog * )GetParent(); 
if ( IDYES == pDlg-» MessageBox( _T(" 对 方 看 来 意犹未尽 ,请 求 与 您 再 战 一 局 , 接受 
这 个 请 求 吗 ?\n\n 选 " 否 "将 断 开 与 他 的 连接 .")， 
_T(" 再 战 "), MB YESNO | MB ICONQUESTION ) ) 
t 
pD1g — > GetDlglItem( IDC BTN BACK ) -> EnableWindow( FALSE ); 
pD1g — > GetDlgItem( IDC BTN QHQ ) -> EnableWindow(); 
pD1g — > GetDlgItem( IDC BTN LOST ) -> EnableWindow(); 


MSGSTRUCT msg; 
msg.uMsg - MSG AGREEAGAIN; 


m clientSocket.Send( (LPCVOID)&msg, sizeof( MSGSTRUCT ) ); 


Clear( (BOOL)m color ); 
SetGameMode( 2 ); 


else 


m clientSocket. Close(); 

m serverSocket. Close(); 

pD1g — GetDlgItem( IDC BTN BACK ) -> EnableWindow( FALSE ); 
pD1g — GetDlgItem( IDC BTN QHQ ) —» EnableWindow( FALSE ); 
pD1g — GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ); 
pD1g — > GetDlgItem( IDC CMB CHAT ) -> EnableWindow( FALSE ); 
// 设 置 菜单 状态 

SetMenuState( TRUE ); 

// 设 置 棋盘 等 待 状态 

SetWait( TRUE ); 

// 设 置 网 络 连 接 状 态 

m bConnected = FALSE; 

// 重 新 设置 玩家 名 称 

pD1g — > SetDlgItemText( IDC_ST_ENEMY，_T(" 无 玩家 加 入 ") ); 
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break; 
case MSG AGREEAGAIN: 

t 
CDialog * pDlg = (CDialog * )GetParent(); 
pD1g -> GetDlgItem( IDC BTN BACK ) 一 > EnableWindow( FALSE ); 
pDlg — > GetDlgItem( IDC BTN QHQ ) 一 > EnableWindow(); 
pD1g -> GetDlgItem( IDC BTN LOST ) -> EnableWindow(); 
Clear( (BOOL)m color ); 
SetGameMode( 2 ); 

) 

break; 

) 
) 


(5) 修改 OnLButtonUp 函数 : 


// 以 下 两 行为 网 络 对 战 新 增 
pDlg -> GetDlgItem( IDC_BTN_QHQ ) -> EnableWindow( FALSE ); 
pD1g -> GetDlgItem( IDC BTN LOST ) -> EnableWindow( FALSE ) 


9.3.9 CServerDlg 类 和 CClientDlg 类 的 设计 


CServerDlg 和 CClientDlg 是 两 个 对 话 框 类 ,前 者 用 于 发 起 游戏 等 待 其 他 网 络 玩家 加 
人 ,后 者 是 加 入 别人 已 经 开设 的 游戏 桌 (对 方 已 发 起 游戏 ) 。 

在 项 目的 资源 视图 中 插入 一 个 对 话 框 IDD_DLG_SERVER ,根据 图 9. 32 所 示 的 布局 
和 表 9.4 所 示 的 控件 属性 创建 对 话 框 对 象 。 


以 下 是 和 的 主机 各 和 tp 地 址 ， pu Lex 由 于 家 叮 以 通 过 它们 来 和 上] | 
Lii AME III ; eM 
&EN FID , WE RRIDHAE. 


状态 : 连 按 未 建立 。 


[发 起 游戏 ,等待 地 人 加 入 


图 9.32 “发 起 游戏 "对话 框 
表 9.4 “发 起 游戏 "对 话 框 中 控件 的 属性 


控件 ID 控件 标题 类 型 
IDC_ST_STATUS 状态 : 连接 未 建立 静态 文本 
IDC_EDIT_HOST 无 编辑 框 
IDC_EDIT_IP 无 编辑 框 
IDC_BTN_LISTEN 发 起 游戏 ,等 待 他 人 加 入 按钮 
IDC_BTN_LEAVE 取消 按钮 


这 个 对 话 框 的 作用 是 让 玩家 输入 本 机 的 主机 名 或 IP 地 址 ,然后 在 这 个 地 址 上 启用 套 接 
字 侦 听 , 等 待 其 他 玩家 的 连接 到 来 。 

类 似 地 ,在 项 目的 资源 视图 中 插入 一 个 对 话 框 IDD_DLG_CLIENT, 根 据 图 9. 33 所 示 
的 布局 和 表 9.5 所 示 的 控件 属性 创建 对 话 框 对 象 。 
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加 果 网 络 上 有 其 他 的 玩家 建立 了 游戏 ,您 可 以 通过 地 的 主机 
í DRZE, 推荐 
使 用 主机 名 ; 加 果 你 是 在 因特网 中 ,请 您 使 用 也 地 址 。 


主机 名 /ip 地 址 ; [FPR Ji 


TEG3838...(5) 


图 9. 33 “加 入 游戏 中 ”对 话 框 
表 9.5 “加 入 游戏 中 ”对 话 框 中 控件 的 属性 


控件 ID 控件 标题 类 型 
IDC ST TIMER 正在 连接 .…(5) 静态 文本 
IDC_EDIT_HOST 无 编辑 框 
IDC_BTN_CONNECT 连接 网 络 玩家 按钮 
IDC_BTN_OUT 取消 按钮 


接 下 来 分 别 创建 CServerDlg 类 和 CClientDlg 类 。 

(1) 创建 CServerDlg 类 : 在 项 目 名 称 Five 上 右 击 ,在 快捷 菜单 中 选择 “添加 一 类 ”命令 , 然 
后 在 弹出 的 对 话 框 中 选择 MEC 类 ,进入 MFC 添加 类 向 导 , 设 定 新 类 名 称 为 CServerDlg、 基 类 
为 CDialog、 对 话 框 DD 为 IDD_DLG_SERVER , 设 定 生成 的 头 文件 为 ServerDlg. h、 程 序 文件 为 
ServerDlg. cpp; 单 击 “ 完 成 ”按钮 ,完成 CServerDlg 类 的 基本 框架 设计 。 

(2) 创建 CClientDlg 类 : 在 项 目 名 称 Five 右 击 ,在 快捷 菜单 中 选择 “添加 一 类 ”命令 , 然 
后 在 弹出 的 对 话 框 中 选择 MFC 类 ,进入 MFC 添加 类 向 导 , 设 定 新 类 名 称 为 CClientDlg、 基 
类 为 CDialog、 对 话 框 ID 为 IDD_DLG_CLIENT, 设 定 生成 的 头 文件 为 ClientDlg. h, JFK 
件 为 ClientDlg. cpp; 单 击 “ 完 成 ”按钮 ,完成 CClientDlg 类 的 基本 框架 设计 。 

下 面 分 别 为 CServerDlg 类 和 CClientDlg 类 添加 事件 响应 函数 。 

(1) 为 CServerDlg 类 添加 事件 响应 函数 : 在 项 目 名 称 Five 上 右 击 ,在 快捷 菜单 中 选择 
“类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 选 择 当 前 类 为 CServerDlg, 然 后 在 “命令 ”选项 卡 中 选择 
IDC_BTN_LISTEN ,选择 消息 BN_CLICKED, 单 击 “ 添 加 处 理 程序 ”按钮 ,定义 事件 响应 函 
数 为 OnClickedBtnListen。 同 样 ,为 IDC _ BTN _ LEAVE 按钮 定义 事件 响应 函数 
OnClickedBtnLeave。 再 转 到 “ 虚 函 数 ” 选 项 卡 , 重 载 OnInitDialog 函数 。 

OnClickedBtnListen 函数 的 代码 如 下 : 

CTable * pTable = (CTable * )GetParent() - > GetDlgItem( IDC TABLE ); 

SetDlgItemText( IDC ST STATUS, _T("jR 25: 等 待 其 他 玩家 加 入 .…") ); 
pTable-»m serverSocket.Create( 20000 ) ; 


pTable-» m serverSocket.Listen(); 
GetDlgItem( IDC BTN LISTEN ) 一 > EnableWindow( FALSE ); 


OnClickedBtnLeave 函数 的 代码 如 下 : 


CTable * pTable = (CTable * )GetParent() -» GetDlgItem( IDC TABLE ); 
pTable- m serverSocket. Close(); 


OnlnitDialog O PR Ziff C83 F: 


GetParent() -> EnableWindow( FALSE ); 
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// 获 取 主 机 名 及 IP 地址 

CHAR szHost[100]; 

CHAR * szIP; 

hostent * host; 

gethostname(szHost, 100); 

SetDlgItemText( IDC EDIT HOST, szHost ); 

host = gethostbyname( szHost ); 

for ( inti = 0; host != NULL && host -» h addr list[i] != NULL; i++) 

t 
szIP = inet ntoa( *( (in addr * )host ->h_addr_list[i] ) ); 
break; 


) 
SetDlgItemText( IDC EDIT IP, szIP ); 


GetDlgItem( IDC BTN LISTEN ) -> SetFocus(); 
return FALSE; 


(2) 为 CClientDlg 类 添加 事件 响应 函数 : 在 项 目 名 称 Five 上 右 击 ,在 快捷 菜单 中 选择 
“类 向 导 ” 命 令 , 进 入 MFC 类 向 导 , 选 择 当 前 类 为 CClientDlg, 然 后 在 “命令 ”选项 卡 中 选择 
IDC_BTN_CONNECT, 选 择 消息 BN_CLICKED, 单 击 “ 添 加 处 理 程序 ”按钮 ,定义 事件 响应 
函数 为 OnClickedBtrnConnect。 同 样 ,为 IDC_ BTN _ OUT 按钮 定义 事件 响应 函数 
OnClickedBtnOut, 为 IDC_EDIT_HOST 编辑 框 定义 OnUpdateEditHost 事件 响应 函数 。 
接着 转 到 “ 虚 函 数 ” 选 项 卡 , 重 载 OnInitDialog 函数 和 OnOK 函数 ; 转 到 “消息 ”选项 卡 ,为 WM_ 
TIMER 消息 添加 响应 函数 OnTimer, 再 添加 两 个 成 员 变 量 int m_nTimer 和 CTable * m_ 
pTable。 下 面 是 增加 的 响应 函数 部 分 的 代码 。 

OnInitDialog 函数 的 代码 如 下 : 


SetDlgItemText( IDC_ST_TIMER，_T("") ); 
m pTable = (CTable * )GetParent()—>GetDlgItem( IDC TABLE ); 
return TRUE; 


OnUpdateEditHost 函数 的 代码 如 下 : 


// 如 果 无 主机 名 , 则 使 “连接 ”按钮 失效 
CString str; 
GetDlgItemText( IDC EDIT HOST, str ); 
GetDlgItem( IDC BTN CONNECT ) -> EnableWindow( !str. IsEmpty() ); 


OnTimer 函数 的 代码 如 下 : 


if(1 == nIDEvent ) 
{ 
if ( m_pTable 一 >m_bConnected ) 
t 
KillTimer( 1); 
EndDialog( IDOK ); 
) 
else if ( 0 == m_nTimer ) 
t 
KillTimer( 1); 
MessageBox( _T(" 连 接 对 方 失败 ,请 检查 主机 名 或 IP 地 址 是 否 正确 ,以 及 网 络 连 接 是 否 
正常 。)， 
_T(" 连 接 失 败 ")，MB_ICONERROR ); 
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SetDlgItemText( IDC ST TIMER, T("") ); 
GetDlgItem( IDC EDIT HOST ) -> EnableWindow(); 
SetDlgItemText( IDC EDIT HOST, T("") ); 
GetDlgItem( IDC EDIT HOST ) -> SetFocus(); 

} 

else 

f 
CString str; 
str.Format( _T(" 正 在 连接 ...(%d)"), m nTiner-- ); 
SetDlgItemText( IDC ST TIMER, str); 

) 


) 
CDialog: :OnTimer(nIDEvent); 


OnClickedBtnConnect 函数 的 代码 如 下 : 


CString strHost; 


// 获 取 主 机 名 称 

GetDlgItemText( IDC EDIT HOST, strHost ); 

// 设 置 超时 时 间 

m nTimer = 5; 

// 初 始 化 连接 状态 

m_pTable 一 >m_bConnected = FALSE; 

// 设 置 控件 生效 状态 

GetDlgItem( IDC BTN CONNECT ) —» EnableWindow( FALSE ); 
GetDlgItem( IDC EDIT HOST ) -> EnableWindow( FALSE ); 
// 创 建 套 接 字 并 连接 

m pTable-»m clientSocket.Create(); 

m pTable- m clientSocket.Connect( strHost, 20000 ); 
// 开 始 计时 

SetTimer( 1, 1000, NULL ); 


OnClickedBtnOut 函数 的 代码 如 下 : 


KillTimer( 1 ); 
OnCancel(); 


对 于 OnOK 函数 不 需要 编码 。 
9.3.10 CNameDIg 类 和 CStatDlg 类 的 设计 


CNameDlg 和 CStatDlg 分 别 用 于 更 改 玩 家 姓名 和 统计 战绩 。 
在 项 目的 资源 视图 中 插入 一 个 对 话 框 IDD_DLG_NAME. 根 据 图 9. 34 所 示 的 布局 和 
表 9.6 所 示 的 控件 属性 创建 对 话 框 。 


图 9.34 “更 改 玩家 姓名 ”对 话 框 
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表 9.6 “更 改 玩家 姓名 "对话 框 中 控件 的 属性 


控件 ID 控件 标题 类 型 
IDC_EDIT_NAME 无 编辑 框 
IDOK 确定 按钮 
IDCANCEL 取消 按钮 


在 项 目的 资源 视图 中 插入 一 个 对 话 框 IDD_DLG_STAT, 根 据 图 9. 35 所 示 的 布局 和 
表 9.7 所 示 的 控件 属性 创建 对 话 框 。 


图 9.35 “战绩 统计 ”对 话 框 


表 9.7 “战绩 统计 ”对 话 框 中 控件 的 属性 


控件 ID 控件 标题 类 型 

IDOK 确定 按钮 

IDC_BTN_RESET 重新 计 分 按钮 

IDC_ST_NAME 无 静态 文本 
IDC_ST_WIN 无 静态 文本 
IDC_ST_DRAW 无 静态 文本 
IDC_ST_LOST 无 静态 文本 
IDC_ST_PERCENT 无 静态 文本 


在 此 仍然 用 MFC 类 向 导 创建 CNameDlg 类 和 CStatDlg 类 ,并 为 其 添加 响应 函数 ,至 
于 详情 请 读者 参见 课件 中 的 源码 文件 。 


9.3.11 完善 CFiveDlg 类 的 设计 


完善 CFiveDlg 类 的 设计 是 整个 网 络 对 战 项 目的 收工 阶段 ,主要 内 容 有 新 的 菜单 项 命令 
函数 ,新 的 界面 元 素 的 事件 函数 。 使 用 MFC 类 向 导 完 善 CFiveDlg 类 的 设计 无 疑 是 最 便捷 
的 ,在 MFC 类 向 导 中 先 将 当前 类 设 定 为 CFiveDlg, 然 后 完成 下 列 步骤 。 

(1) 添加 菜单 项 命令 函数 : 转 到 MEC 类 向 导 的 “命令 ”选项 卡 , 为 菜单 对 象 ID_MENU_ 
SERVER,ID MENU CLIENT,ID MENU. PLAYAGAIN,ID MENU LEAVE,ID 
MENU NAME,ID MENU STAT 添加 事件 响应 函数 OnMenuServer, OnMenuClient, 
OnMenuPlayagain, OnMenuLeave, OnMenuName, OnMenuStat , 

(2) 添加 命令 按钮 事件 函数 : 转 到 MFC 类 向 导 的 “命令 ”选项 卡 ,为 CFiveDlg 对 话 框 
上 的 命令 按钮 IDC_BTN_QHQ、DC_BTN_LOST 添加 事件 响应 函数 OnClickedBtnQhaq、 
OnClickedBtnLost , 
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(3) 添加 WM_SETCURSOR 消息 函数 OnSetCursor。 

(4) 重 载 虚 函数 OnOk、OnCancel、PreTranslateMessage。 

(5) 为 对 话 框 上 的 控件 IDC_EDT_CHAT 添加 对 应 的 成 员 变 量 m_ChatList。 

(6) 添加 自 定义 成 员 变量 m_hChat。 

至 此 ,CFiveDlg 类 的 基本 框架 完成 ,对 于 上 述 函 数 的 编码 请 读者 参见 课件 中 的 源码 
文件 。 


9.3.12 项 目测 试 


CD 在 同一 台 主 机 上 启动 五 子 模 程序 的 两 个 实例 ,设置 两 个 玩家 的 姓名 分 别 为 “玩家 
甲 " 和 “玩家 乙 ”, 如 图 9. 36 所 示 。 


az PK SANEM 


图 9.36 ”启动 两 个 进程 ,模拟 玩家 甲 和 玩家 乙 


(2) 选择 玩家 甲 的 菜单 命令 “开始 网 络 对 战 一 发 起 游戏 ( 先 手 方 )”, 弹 出 “发 起 游戏 ( 先 
手 方 )” 对 话 框 ,如 图 9. 37 所 示 。 该 对 话 框 中 显示 的 主机 名 Better 和 网 络 地址 169. 254. 8. 93 是 
用 WinSock API 自动 捕获 的 ,此 时 网 络 侦 听 还 没有 开始 ,所 以 状态 显示 “连接 未 建立 ”。 单 
击 * 发 起 游戏 ?按钮 ,这 时 玩家 甲 扮演 了 一 个 通信 服务 器 的 角色 等 待 其 他 玩家 (作为 客户 机 ) 
连接 上 来 ,状态 变 为 “等 待 其 他 玩家 加 入 ”。 

(3) 切换 到 玩家 乙 的 进程 界面 ,选择 玩家 乙 的 菜单 命令 “开始 网 络 对 战 一 加 入 游戏 (后 
手 方 )”, 弹 出 “加 入 游戏 (后 手 方 )? 对 话 框 , 如 图 9.38 所 示 。 在 主机 名 /IP 地 址 文本 框 中 输 
人 ”169.254. 8. 93” 或 “Better”, 单 击 “ 连 接 ” 按 钮 ,如 果 连 接 成 功 , 则 网 络 对 战 开 始 。 

(D. 甲 方 是 先 手 方 , 执 黑 先 行 . 甲 方 在 天 元 处 落 子 后 ,可 以 看 到 乙方 同步 显示 ,乙方 落 子 
后 , 甲 方 也 同步 显示 。 甲 乙 双 方 轮流 行 棋 , 网 络 对 战 就 这 样 开始 了 。 图 9. 39 所 示 为 双方 对 
弈 过 程 中 的 截图 。 
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发 起 游戏 KFI) 加 入 游戏 《后 于 广 


加 果 网 络 上 有 其 地 的 玩 守 建 立 了 游戏 , 悠 可 以 通过 届 的 主机 名 或 人 p 地 址 
J 是 网 之 中 , 推荐 使 用 主机 名 ; URE 


是 在 因特网 中 ， 请 您 使 用 


主机 名 : [Better +: [169.254.8.03 主 可 名 /地址 ;|159.254.8.93 
状态 : 连接 未 建立。 


— | 


图 9. 37 “发 起 游戏 ( 先 手 方 )” 对 话 框 图 9. 38 玩家 乙 输 入 玩家 甲 的 网 络 地 址 后 加 入 游戏 


9.39 甲乙 网 络 对 战 截图 


(5) 如 果 此 时 乙方 提出 和 棋 , 甲 方 工作 界面 中 会 弹出 如 图 9. 40 所 示 的 消息 框 ,如 果 甲 
方 同意 ,棋局 结束 ,否则 ,乙方 工作 界面 中 会 收 到 如 图 9. 41 所 示 的 拒绝 和 棋 消 息 。 


M) 对 方 清 求 和 殿 ， 接受 这 个 请 求 吗 1 
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和 棋 


\ 记 看 来 对 方 很 有 信心 取得 胜利 ， 所 以 拒绝 了 您 的 和 慌 请 求 。 


9.41 乙方 收 到 甲 方 拒绝 和 棋 的 消息 


此 时 ,乙方 可 以 通过 聊天 方式 与 甲 方 进一步 沟通 ,或 者 选择 继续 战斗 ,直到 分 出 胜 负 。 
网 络 对 战 更 多 的 功能 测试 ,读者 可 以 自行 体验 , 纸 上 得 来 终 觉 浅 , 绝 知 此 事 要 躬 行 。 


Er 


1. 查阅 资料 , 尽 可 能 列举 五 子 棋 的 开局 定式 进行 研究 。 

2. 查阅 资料 , 尽 可 能 列举 能 提高 计算 机 博弈 水 平 的 算法 。 再 结合 五 子 棋 的 开局 定式 和 
行 棋 特 点 ,选择 一 种 你 认为 最 好 的 方法 ,对 本 章 的 人 机 博弈 过 程 进 行 改进 ,以 提高 计算 机 的 
行 棋 能 力 。 

3. 尝试 为 五 子 棋 增 加 棋局 保存 .连续 悔 棋 和 复 盘 功 能 。 

4. 尝试 为 对 战 双方 加 入 计时 和 读 秒 功能 。 

5. 网 上 的 棋 类 游戏 都 会 设置 一 个 游戏 大 厅 场 景 ,对 于 发 起 游戏 的 玩家 ,大 厅 会 为 其 分 
配 一 张 游 戏 桌 , 举 手 等 待 其 他 玩家 就 座 。 和 希望 加 入 游戏 的 玩家 , 单 击 空 座 即 可 进入 对 战 模 
式 。 大 厅 里 会 维持 正在 进行 的 游戏 对 局 ,第 三 方 玩家 可 以 进去 观摩 。 尝 试 改造 本 章 的 网 络 
对 战 程序 ,加 入 游戏 大 厅 的 控制 机 制 。 

6. 学 习 和 了 解 五 子 棋 的 国际 、 国 内 大 赛 规则 ,尝试 为 对 战 双方 加 入 “ 禁 手 ”功能 。 
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